Metrics for raw-angle from scale-rotated-ellipse

start0.0ms (0%)

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

analyze2.3s (11.8%)

Memory

-101.6MiB live, 1 420.6MiB allocated; 1.7s 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
0.6%	0.6%	99.2%	0.2%	0%	0%	0%	11
0.7%	0.7%	99.1%	0.2%	0%	0%	0%	12

Compiler

Compiled 171 to 45 computations (73.7% saved)

sample6.0s (30.7%)

Memory

181.6MiB live, 7 006.9MiB allocated; 1.3s collecting garbage

Samples

2.1s	2 680×	1	valid
1.4s	1 240×	2	valid
1.2s	4 194×	0	valid
254.0ms	142×	3	valid
46.0ms	104×	0	invalid

Precisions

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

ival-pow2: 1.2s (25.7% of total)

ival-cosu: 703.0ms (15.2% of total)

ival-sinu: 611.0ms (13.2% of total)

ival-div!: 560.0ms (12.1% of total)

ival-mult!: 541.0ms (11.7% of total)

adjust: 476.0ms (10.3% of total)

ival-sub!: 157.0ms (3.4% of total)

ival-add!: 130.0ms (2.8% of total)

ival-sqrt: 127.0ms (2.7% of total)

ival-atan: 127.0ms (2.7% of total)

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

Bogosity

preprocess48.0ms (0.2%)

Memory

-22.7MiB live, 35.9MiB allocated; 8ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	452	3581
1	1526	3549

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	17.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))

Status

Accuracy

Program

▶

17.4%

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))

Symmetry

(abs a)

(abs b)

(negabs x-scale)

(negabs y-scale)

Compiler

Compiled 276 to 90 computations (67.4% saved)

series498.0ms (2.5%)

Memory

23.5MiB live, 542.6MiB allocated; 64ms collecting garbage

Counts

45 → 374

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
x-scale
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))

Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow 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 (/ (/ (+ (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow y-scale 2) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
58.0ms	b	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
41.0ms	angle	@	inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
38.0ms	angle	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
37.0ms	b	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))
33.0ms	a	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) a (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) angle (PI) 2 (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) b (sin (* (/ angle 180) (PI))) y-scale (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) x-scale (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2))

rewrite458.0ms (2.3%)

Memory

1.4MiB live, 508.8MiB allocated; 88ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2514	106374
0	2601	98016
0	9023	95908

Stop Event

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

Counts

419 → 469

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
a
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
x-scale
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))
(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale)))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 2 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (+ (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* 2 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (+ (* -2 (pow a 2)) (* 2 (pow b 2)))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (pow b 2)))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (pow a 2) #s(hole binary64 (pow a 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) x-scale))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale)) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) x-scale)))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* -2 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (sin (* 1/180 (* angle (PI))))) (* 2 (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2)))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* -2 (pow a 2))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow a 2) (- (* 2 (/ (pow b 2) (pow a 2))) 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (* b (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (pow b 2) (pow a 2)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (pow a 2) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale)))))) (/ (pow a 2) y-scale))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) y-scale)) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) y-scale)) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) y-scale)) (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) y-scale) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) y-scale))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) y-scale))))))) (/ (pow a 2) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow 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 (/ (/ (+ (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (cos (* (/ angle 180) (PI))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* (/ angle 180) (PI))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -2 (* (pow y-scale 2) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (/ (- (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (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 #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))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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 #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 (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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 #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))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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 #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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (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 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (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 #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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (.f64 (.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 (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 #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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) #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 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (fma.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 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (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 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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)) (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 (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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))) (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) (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 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) x-scale) (.f64 y-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 y-scale x-scale))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (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))))
a
(sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (neg.f64 angle) #s(literal -180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
(PI.f64)
#s(literal 2 binary64)
(.f64 (.f64 b b) (pow.f64 (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))) #s(literal 2 binary64)))
(.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) #s(literal 2 binary64)))
(.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
b
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
y-scale
(/.f64 (neg.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))
(.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))))
x-scale
(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 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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 (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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 a a) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 #s(literal 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.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))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.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))))
#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 a a)
#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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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)))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)))))) (/.f64 #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 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (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 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (/.f64 (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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (+.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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 a a) (-.f64 (+.f64 (/.f64 (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))) (+.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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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/2 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 a a)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (fma.f64 #s(literal 1/2 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 a a)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (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 (.f64 a (cos.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 (sin (* (/ angle 180) (PI)))) (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx b b)
#s(approx (* b (cos (* (/ angle 180) (PI)))) (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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))))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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)))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)))))) (/.f64 #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 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.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 (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 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 b b) (-.f64 (/.f64 (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)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 b b) (-.f64 (+.f64 (/.f64 (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))) (+.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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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/2 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 b b)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (fma.f64 #s(literal 1/2 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 b b)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))))) angle))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 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 (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 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (fma.f64 (.f64 angle angle) (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 (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 (/ (/ (+ (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 (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (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 (-.f64 (/.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 #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)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 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 (-.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 #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 (-.f64 (/.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 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.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 (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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 (/ (/ (+ (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 x-scale x-scale)
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.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)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (*.f64 a a))))))))))) x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 -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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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))) (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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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))) (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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 6 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 3 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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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))))))) (.f64 (cos.f64 (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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)))))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-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 y-scale y-scale)
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 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 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 #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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (/.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) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 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 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 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 3 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))

eval117.0ms (0.6%)

Memory: 36.6MiB live, 171.2MiB allocated; 35ms collecting garbage
Compiler: Compiled 70 753 to 5 990 computations (91.5% saved)

prune95.0ms (0.5%)

Memory

-6.4MiB live, 134.0MiB allocated; 18ms collecting garbage

Pruning

29 alts after pruning (29 fresh and 0 done)

	Pruned	Kept	Total
New	403	29	432
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	404	29	433

Accuracy

60.2%

Counts

433 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
	18.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (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 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) x-scale) x-scale)) (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 (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.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)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64)))
	12.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 #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)))))))))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 #s(approx ( (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 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)))))))))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	12.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #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)))))))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 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)))))))))) x-scale) y-scale))) (PI.f64)))
	11.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #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)))))))) y-scale) #s(literal 2 binary64))))) (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.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)))))))) y-scale))) (PI.f64)))
▶	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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))))))))))) (PI.f64)))
▶	13.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
	9.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.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)))))) (PI.f64)))
	16.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	12.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	7.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	13.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #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(literal 2 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 #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(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #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(literal 2 binary64)) (pow.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)))) #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))))))) 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)))) #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))))))) x-scale) y-scale))) (PI.f64)))
	18.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.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) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #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)) #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)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) 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)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale))) (PI.f64)))
	12.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 #s(approx (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	6.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	9.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	5.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	11.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	22.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	14.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))) (PI.f64)))
	2.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))) (PI.f64)))
▶	11.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
▶	25.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
▶	32.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	8.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	25.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	7.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (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 (pow.f64 (.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 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)))))))))) (PI.f64)))
	18.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))

Compiler

Compiled 10 138 to 4 428 computations (56.3% saved)

series905.0ms (4.6%)

Memory

21.8MiB live, 1 079.6MiB allocated; 182ms collecting garbage

Counts

132 → 836

Calls

Call 1

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

Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* 2 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale)))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale))) (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale))) (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale)))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (* (pow a 2) (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))) (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (PI)) (* x-scale y-scale))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (/ (* (pow b 2) (PI)) (* x-scale y-scale)))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* (pow a 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (pow (PI) 3))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (PI) 3))) (* (pow b 2) (pow (PI) 3)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow a 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* 2 (/ (pow a 2) y-scale))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 y-scale))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 (pow y-scale 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale)))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (* angle (PI)) (* x-scale y-scale))) (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale)))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* angle (PI)) (* x-scale y-scale))) (/ (* angle (* (pow b 2) (PI))) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (+ (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))) (/ (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (pow a 2))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (+ (* 1/90 (/ (* (pow b 2) (PI)) (* (pow a 2) (* x-scale y-scale)))) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2)))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (PI)) (* x-scale y-scale)))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (PI) (* x-scale y-scale))) (/ (* (pow b 2) (PI)) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))) (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (pow (PI) 3) (* x-scale y-scale))) (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (pow (PI) 3)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (pow (PI) 3)) (/ (* (pow b 2) (pow (PI) 3)) (pow a 2))))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (+ (* angle (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))) (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))) (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (+ (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale (pow x-scale 2))) (* 2 (/ (pow a 2) (* (pow b 2) y-scale)))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (* 2 (/ 1 (pow x-scale 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* (pow b 2) (* x-scale y-scale)))) (* 1/90 (/ (* angle (PI)) (* x-scale y-scale)))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (* (pow b 2) (* x-scale y-scale)))) (/ (* angle (PI)) (* x-scale y-scale))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow b 2) (+ (* angle (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))) (/ (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (pow b 2))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/90 (/ (* (pow a 2) (PI)) (* (pow b 2) (* x-scale y-scale)))) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2)))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (PI)) (* (pow b 2) (* x-scale y-scale)))) (/ (PI) (* x-scale y-scale))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))) (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (+ (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale)))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale))))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale)))) (/ (pow (PI) 3) (* x-scale y-scale))))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (pow b 2))) (pow (PI) 3)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) y-scale))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (* 2 (pow b 2)))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 2 (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (pow (* b (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 (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 (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 (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (+ (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))) (* (pow angle 2) (* x-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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)))) (* (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)))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ y-scale (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (+ (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* (pow angle 2) (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (+ (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* (pow angle 2) (+ (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ -2 (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 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/2 (* (pow x-scale 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)))))))))) (* 2 (/ 1 (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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)))))))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* 2 (/ 1 (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-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)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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)))))))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* 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 (* 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))) (* 2 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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))))))))))))) (* 2 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* (pow x-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 x-scale 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 angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))) (* 2 (/ 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 (/ 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 (+ (* 1/2 (* (pow angle 2) (* (pow x-scale 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 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 (+ (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (* (pow x-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 x-scale 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)))))))) (* 1/2 (* (pow x-scale 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 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 (+ (* (pow angle 2) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))) (* 1/2 (* (pow x-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 x-scale 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))))))))))) (/ 1 (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 (/ 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 (* (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 (+ (* (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 (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow 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 (/ angle 180) #s(hole binary64 (* 1/180 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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 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 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 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (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 (* angle angle) #s(hole binary64 (pow angle 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (pow (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (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) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* 2 (* (pow angle 3) (+ (* -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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow angle 3) (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 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 (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (* (pow angle 3) (+ (* -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))))) (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 2) (* x-scale y-scale)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) (pow x-scale 2))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2))) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 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))) #s(hole binary64 (* 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))) #s(hole binary64 (/ (+ (* 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))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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))) #s(hole binary64 (/ (+ (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 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)))) (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))) #s(hole binary64 (/ (+ (* 2 (pow (cos (* 1/180 (* angle (PI)))) 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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (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))) #s(hole binary64 (/ (+ (* 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))))) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 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)))) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (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 (* (* x-scale x-scale) (* y-scale y-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (/ (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))))))) x-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (/ (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))))) x-scale)))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (/ (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))) x-scale)))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-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)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (pow (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))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (pow (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 (+ (* 1/2 (/ (* (pow y-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)))) 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 (+ (* 1/2 (/ (* (pow y-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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (/ (* angle (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))))))) x-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* -1 (/ (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))))) x-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* -2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* -1 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) y-scale)))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 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) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* -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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* -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) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* 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))))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-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))))))) y-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (/ (+ (* 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)))))) y-scale)))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 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)))) y-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (/ (* (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)))) y-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (/ (+ (* -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))) y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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 (+ (* 1/2 (/ (* (pow x-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)))) 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 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (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 (+ (* -2 (/ (* (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (/ (* angle (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))) y-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* -1 (/ (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))) y-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* -2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) y-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* -1 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) y-scale))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))) y-scale))))

Calls

15 calls:

Time	Variable		Point	Expression
81.0ms	b	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) a (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) b (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) (* a a) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* y-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))) (/ (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))) (/ (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) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (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)) 4 (/ (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))))) (* (* x-scale x-scale) (* y-scale y-scale)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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 (cos (* 1/180 (* angle (PI)))) 2) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (sin (* (/ angle 180) (PI))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (* x-scale y-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* (* (PI) (PI)) (PI)) (* (PI) (PI)) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) -1/34992000)
78.0ms	b	@	inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) a (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) b (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) (* a a) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* y-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))) (/ (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))) (/ (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) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (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)) 4 (/ (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))))) (* (* x-scale x-scale) (* y-scale y-scale)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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 (cos (* 1/180 (* angle (PI)))) 2) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (sin (* (/ angle 180) (PI))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (* x-scale y-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* (* (PI) (PI)) (PI)) (* (PI) (PI)) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) -1/34992000)
58.0ms	angle	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) a (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) b (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) (* a a) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* y-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))) (/ (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))) (/ (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) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (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)) 4 (/ (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))))) (* (* x-scale x-scale) (* y-scale y-scale)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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 (cos (* 1/180 (* angle (PI)))) 2) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (sin (* (/ angle 180) (PI))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (* x-scale y-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* (* (PI) (PI)) (PI)) (* (PI) (PI)) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) -1/34992000)
57.0ms	y-scale	@	inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) a (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) b (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) (* a a) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* y-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))) (/ (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))) (/ (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) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (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)) 4 (/ (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))))) (* (* x-scale x-scale) (* y-scale y-scale)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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 (cos (* 1/180 (* angle (PI)))) 2) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (sin (* (/ angle 180) (PI))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (* x-scale y-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* (* (PI) (PI)) (PI)) (* (PI) (PI)) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) -1/34992000)
46.0ms	a	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) a (sin (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (* b (cos (* 1/180 (* angle (PI))))) b (cos (* 1/180 (* angle (PI)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (- (* b b) (* a a)) (* b b) (* a a) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* y-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))) (/ (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))) (/ (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) (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (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)) 4 (/ (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))))) (* (* x-scale x-scale) (* y-scale y-scale)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-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 (cos (* 1/180 (* angle (PI)))) 2) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) (pow (* a (cos (* (/ angle 180) (PI)))) 2) (* a (cos (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (pow (* b (sin (* (/ angle 180) (PI)))) 2) (* b (sin (* (/ angle 180) (PI)))) (sin (* (/ angle 180) (PI))) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) (pow (* a (sin (* (/ angle 180) (PI)))) 2) (* a (sin (* (/ angle 180) (PI)))) (pow (* b (cos (* (/ angle 180) (PI)))) 2) (* b (cos (* (/ angle 180) (PI)))) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (* x-scale y-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* (* (PI) (PI)) (PI)) (* (PI) (PI)) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) -1/34992000)

rewrite826.0ms (4.2%)

Memory

-1.5MiB live, 1 117.1MiB allocated; 269ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	5113	190150
0	5350	178639
0	9978	174926

Stop Event

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

Counts

968 → 1 095

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(literal -1/2 binary64)
(/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
y-scale
(fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (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 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
a
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(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)))))
b
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))
(-.f64 (.f64 b b) (.f64 a a))
(*.f64 b b)
(*.f64 a a)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(literal 90 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
(/.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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)))
#s(literal 4 binary64)
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/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)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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))
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64)))))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
(+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(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))
(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)))
(/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(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 #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(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 #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(literal 2 binary64))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 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(literal 1/90 binary64)
(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 x-scale y-scale))
(*.f64 x-scale y-scale)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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))))))))))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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))))))))))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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)))))))))))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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))))))))))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 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 #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(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 #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(literal 2 binary64)))
(pow.f64 #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(literal 2 binary64))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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)))))))))
(.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))))))))
(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)))))))
(/.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))))))
(.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)))))
(*.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(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 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (*.f64 a a)))
(.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))
(*.f64 (PI.f64) (PI.f64))
(.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(literal -1/34992000 binary64)
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx a #s(hole binary64 a))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2)))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* 2 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 2) (pow y-scale 2))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) y-scale))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (cos (* (/ angle 180) (PI)))) 2) #s(hole binary64 (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* a (cos (* 1/180 (* angle (PI)))))))
#s(approx (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow a 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow a 2) (+ (* -1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow a 2) (+ (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow a 2) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale)))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale))) (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale))) (/ (* angle (* (pow b 2) (PI))) (* x-scale y-scale)))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (+ (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (* (pow a 2) (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))) (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (PI)) (* x-scale y-scale))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (/ (* (pow b 2) (PI)) (* x-scale y-scale)))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (+ (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* (pow a 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (pow (PI) 3))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (pow (PI) 3))) (* (pow b 2) (pow (PI) 3)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow a 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* 2 (/ (pow a 2) y-scale))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 y-scale))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 (pow y-scale 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) y-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow a 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow a 4) (+ (* 2 (/ (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow a 2))) (+ (/ (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow a 4)) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale)))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (* angle (PI)) (* x-scale y-scale))) (* 1/90 (/ (* angle (* (pow b 2) (PI))) (* (pow a 2) (* x-scale y-scale))))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (* angle (PI))) (* x-scale y-scale)))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (* angle (PI)) (* x-scale y-scale))) (/ (* angle (* (pow b 2) (PI))) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow a 2) (+ (* angle (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))) (/ (* angle (+ (* 1/90 (/ (* (pow b 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (pow a 2))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow a 2) (+ (* -1/90 (/ (PI) (* x-scale y-scale))) (+ (* 1/90 (/ (* (pow b 2) (PI)) (* (pow a 2) (* x-scale y-scale)))) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2)))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (PI)) (* x-scale y-scale)))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (PI) (* x-scale y-scale))) (/ (* (pow b 2) (PI)) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow a 2) (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow a 2) (+ (* (pow angle 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))))) (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow a 2))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -1/11664000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (+ (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/11664000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow a 2) (+ (* -1 (/ (pow (PI) 3) (* x-scale y-scale))) (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (pow (PI) 3)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (pow (PI) 3)) (/ (* (pow b 2) (pow (PI) 3)) (pow a 2))))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -1/34992000 (/ (* (pow b 2) (pow (PI) 3)) (* (pow a 2) (* x-scale y-scale)))) (* 1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (* b (cos (* 1/180 (* angle (PI)))))))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* b (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* b (sin (* 1/180 (* angle (PI)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* 1/2 (* (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (* (pow b 2) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow b 2) (+ (* -1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 2 (* (pow b 2) (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* (pow b 2) (+ (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* (pow b 2) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (+ (* angle (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))) (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))) (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (+ (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (+ (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale (pow x-scale 2))) (* 2 (/ (pow a 2) (* (pow b 2) y-scale)))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (* 2 (/ 1 (pow x-scale 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) y-scale)))))
#s(approx (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) x-scale)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))
#s(approx (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) #s(hole binary64 (* (pow b 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (* (pow b 2) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* -1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (* (pow b 4) (+ (* 2 (/ (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (pow b 2))) (+ (/ (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (pow b 4)) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1/90 (/ (* (pow a 2) (* angle (PI))) (* (pow b 2) (* x-scale y-scale)))) (* 1/90 (/ (* angle (PI)) (* x-scale y-scale)))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (* (pow b 2) (* x-scale y-scale)))) (/ (* angle (PI)) (* x-scale y-scale))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* angle (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow b 2) (+ (* angle (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))) (/ (* angle (+ (* -1/90 (/ (* (pow a 2) (PI)) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale)))))))) (pow b 2))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow b 2) (+ (* -1/90 (/ (* (pow a 2) (PI)) (* (pow b 2) (* x-scale y-scale)))) (+ (* 1/90 (/ (PI) (* x-scale y-scale))) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2)))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (PI)) (* (pow b 2) (* x-scale y-scale)))) (/ (PI) (* x-scale y-scale))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))) (* 2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow angle 2) (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (pow b 2) (+ (* (pow angle 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))))) (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* x-scale y-scale))))) (pow b 2))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* (pow b 2) (+ (* -1/11664000 (/ (pow (PI) 3) (* x-scale y-scale))) (+ (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (+ (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale)))) (* 1/11664000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale))))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale)))) (/ (pow (PI) 3) (* x-scale y-scale))))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (pow (PI) 3)) (pow b 2))) (pow (PI) 3)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -1/34992000 (/ (pow (PI) 3) (* x-scale y-scale))) (* 1/34992000 (/ (* (pow a 2) (pow (PI) 3)) (* (pow b 2) (* x-scale y-scale))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) y-scale))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* -1/16200 (* (pow angle 2) (* (pow b 2) (pow (PI) 2)))) (* 2 (pow b 2)))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 2 (* (pow angle 2) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))))
#s(approx (pow (* b (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 (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 (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 (* b (cos (* 1/180 (* angle (PI))))) #s(hole binary64 (+ b (* -1/64800 (* (pow angle 2) (* b (pow (PI) 2)))))))
#s(approx (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (+ (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))) (* (pow angle 2) (* x-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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)))) (* (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)))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ y-scale (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (+ (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* (pow angle 2) (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (+ (* -2 (/ y-scale (pow x-scale 2))) (* (pow angle 2) (+ (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* (pow angle 2) (+ (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ -2 (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 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/2 (* (pow x-scale 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)))))))))) (* 2 (/ 1 (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-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))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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)))))))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* 2 (/ 1 (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-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)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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)))))))))))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))) (* 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 (* 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))) (* 2 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/2 (* (pow x-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 x-scale 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))))))))))))) (* 2 (/ 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))) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/2 (* (pow x-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 x-scale 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 angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))) (* 2 (/ 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 (/ 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 (+ (* 1/2 (* (pow angle 2) (* (pow x-scale 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 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 (+ (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (* (pow x-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 x-scale 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)))))))) (* 1/2 (* (pow x-scale 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 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 (+ (* (pow angle 2) (+ (* 1/2 (* (pow x-scale 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))))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))) (* 1/2 (* (pow x-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 x-scale 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))))))))))) (/ 1 (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 (/ 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 (* (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 (+ (* (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 (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (/ (pow a 2) (pow y-scale 2)) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))))) (/ (pow a 2) (pow y-scale 2))) (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (+ (* (pow 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 (/ angle 180) #s(hole binary64 (* 1/180 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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (- (+ (* (pow angle 2) (+ (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 1/2 (/ (* (pow angle 2) (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) (/ (pow b 2) (pow x-scale 2))) (/ (pow a 2) (pow y-scale 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (+ (* (pow angle 2) (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2)))))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* 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 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 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) #s(hole binary64 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (+ (* 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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* (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 (* angle angle) #s(hole binary64 (pow angle 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (/ (pow (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (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) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))))
#s(approx (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) y-scale)))
#s(approx (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale)))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2) #s(hole binary64 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* 2 (* (pow angle 3) (+ (* -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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* (pow angle 3) (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 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 (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* (pow angle 2) (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (* (pow angle 3) (+ (* -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))))) (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* (pow angle 2) (* x-scale y-scale)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) (pow x-scale 2))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2))) (pow x-scale 2))))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 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))) #s(hole binary64 (* 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))) #s(hole binary64 (/ (+ (* 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))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 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))) #s(hole binary64 (/ (+ (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 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)))) (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))) #s(hole binary64 (/ (+ (* 2 (pow (cos (* 1/180 (* angle (PI)))) 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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (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))) #s(hole binary64 (/ (+ (* 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))))) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 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)))) (pow (cos (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 6))) (* 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 (cos (* 1/180 (* angle (PI)))) 4)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (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 (* (* x-scale x-scale) (* y-scale y-scale)) #s(hole binary64 (* (pow x-scale 2) (pow y-scale 2))))
#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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (- (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))) (pow x-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))))))) (pow x-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow x-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* (pow x-scale 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)) (pow x-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (* x-scale y-scale) #s(hole binary64 (* x-scale y-scale)))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (/ (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))))))) x-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (/ (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))))) x-scale)))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 2 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (/ (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (/ (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))) x-scale)))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) #s(hole binary64 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) #s(hole binary64 (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2)))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) (pow x-scale 2))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-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)))) 2))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-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)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (+ (* 1/2 (/ (* (pow y-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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (pow (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))) #s(hole binary64 (+ (* -1/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (/ (pow (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 (+ (* 1/2 (/ (* (pow y-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)))) 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 (+ (* 1/2 (/ (* (pow y-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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))))
#s(approx (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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/4 (/ (* (pow y-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2)))) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (+ (* -1 (/ (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 4) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (pow x-scale 2))) (+ (/ (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (pow x-scale 4)) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))
#s(approx (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (/ (* angle (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))))))) x-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* -1 (/ (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) y-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))))) x-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* -2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* -1 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)))) x-scale))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) y-scale))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx y-scale #s(hole binary64 y-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) y-scale)))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (pow y-scale 2) (+ (* -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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 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) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* -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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* -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) (pow x-scale 4)) (* 1/4 (/ (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 6))))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) #s(hole binary64 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) #s(hole binary64 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* 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))))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 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)))) (pow (sin (* 1/180 (* angle (PI)))) 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 (/ (+ (* (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)))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 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 (sin (* 1/180 (* angle (PI)))) 4)))) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))
#s(approx (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (/ (+ (* -1 (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))) (pow y-scale 2))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (/ (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (+ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow y-scale 2) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))))))) (pow y-scale 2))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (/ (+ (* (pow y-scale 2) (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* (pow y-scale 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)) (pow y-scale 4))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (/ (+ (* -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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-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))))))) y-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (/ (+ (* 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)))))) y-scale)))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* 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)))) y-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (/ (* (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)))) y-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (/ (+ (* -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))) y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2)))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* y-scale (- (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))))) (* 1/2 (/ (* (pow x-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)))) 2))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (* 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))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 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 (+ (* 1/2 (/ (* (pow x-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)))) 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 (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 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 (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-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)))) 2)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (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 (+ (* -2 (/ (* (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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) #s(hole binary64 (* -1 (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) #s(hole binary64 (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) (pow y-scale 2))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (pow y-scale 4)) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))))
#s(approx (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) #s(hole binary64 (+ (* -2 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2)))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 6) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 2) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) #s(hole binary64 (* -1 (/ (* angle (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))))))) y-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) #s(hole binary64 (* -1 (/ (+ (* -1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) x-scale)) (* 2 (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))))) y-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) #s(hole binary64 (* -2 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) y-scale))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) #s(hole binary64 (* -1 (/ (* (pow angle 2) (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)))) y-scale))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) #s(hole binary64 (* -1 (/ (+ (* 1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale)) (* 1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) x-scale))) y-scale))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(literal -1/2 binary64)
(.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (neg.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (neg.f64 (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
y-scale
(fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(+.f64 (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (pow.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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)))
(.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
a
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 (.f64 b b) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.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)))))
b
(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 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.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 (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 (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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(literal 90 binary64)
(.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (neg.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
(.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(/.f64 (neg.f64 (.f64 a a)) (neg.f64 (.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.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 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 b 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)))
(.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(.f64 (/.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
(/.f64 (neg.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
(/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))
(.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (fma.f64 (/.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (fma.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
(/.f64 (neg.f64 (pow.f64 (sin.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(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)))
(+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-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 1/2 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))))
(fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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)))
#s(literal 4 binary64)
(.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))
(/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 (cos.f64 (.f64 #s(literal 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)))))
(.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.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 2 binary64)) (.f64 x-scale x-scale)) (/.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (/.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(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 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)) (fma.f64 (/.f64 (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 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))
(/.f64 (-.f64 (.f64 (pow.f64 (cos.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 (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))
(/.f64 (neg.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (neg.f64 (*.f64 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 (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 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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))))))) (neg.f64 #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))))))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))
(-.f64 (/.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #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))))) (/.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)) #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #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)) #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(literal 3 binary64))) (fma.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (fma.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)) #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))))) (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)) #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))))) (.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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)))))))))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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))))))
(/.f64 (-.f64 (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)) (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))) (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) (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 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) x-scale) (.f64 y-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 y-scale x-scale))
(-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (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))
(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))
(.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)))
(/.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))
(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)))
(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)))
(+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.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 (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))))
(.f64 (.f64 a a) (pow.f64 (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))
(exp.f64 (.f64 (log.f64 (.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))) #s(literal 2 binary64)))
(.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (.f64 b (cos.f64 (*.f64 (/.f64 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)))
(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))))
(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 #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(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 #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(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)) #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)))))
(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 #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(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 #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(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 #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 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))
(pow.f64 #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.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(literal 2 binary64))
(exp.f64 (.f64 (log.f64 #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(literal 2 binary64)))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 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(literal 1/90 binary64)
(.f64 (/.f64 angle x-scale) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) y-scale))
(/.f64 (neg.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 x-scale y-scale))
(*.f64 x-scale y-scale)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 x-scale y-scale))))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #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)))))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 x-scale y-scale))))))))))) (PI.f64))
(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #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)))))))))))
(/.f64 (neg.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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)))))))))))) (neg.f64 #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)))))))))))
(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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 #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))))))))))
(-.f64 (/.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #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)))))))))) (/.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)) #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 #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)))))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #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)) #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(literal 3 binary64))) (fma.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (fma.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)) #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)))))))))) (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)) #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)))))))))) (.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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))))))))))))))
(-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (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)) #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)))))))))))
(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 #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(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 #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(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)) #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))))))))))
(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 #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(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 #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(literal 2 binary64)))
(.f64 #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.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 #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))))))))))
(pow.f64 #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(literal 2 binary64))
(exp.f64 (.f64 (log.f64 #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(literal 2 binary64)))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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)))))))))
(.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))))))))
(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)))))))
(+.f64 (.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)))))))
(.f64 (/.f64 (PI.f64) x-scale) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) y-scale))
(/.f64 (neg.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 x-scale y-scale)))
(/.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))))))
(.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)))))
(*.f64 (fabs.f64 angle) (fabs.f64 angle))
(*.f64 (neg.f64 angle) (neg.f64 angle))
(*.f64 angle angle)
(pow.f64 angle #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 angle) #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 #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(literal -1/11664000 binary64)
(.f64 (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) x-scale) (/.f64 (-.f64 (.f64 b b) (*.f64 a a)) y-scale))
(/.f64 (neg.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a)))) (neg.f64 (.f64 x-scale y-scale)))
(/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale))
(.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (*.f64 a a)))
(.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))
(.f64 (PI.f64) (.f64 (PI.f64) (PI.f64)))
(pow.f64 (PI.f64) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64)))
(*.f64 (fabs.f64 (PI.f64)) (fabs.f64 (PI.f64)))
(*.f64 (neg.f64 (PI.f64)) (neg.f64 (PI.f64)))
(*.f64 (PI.f64) (PI.f64))
(pow.f64 (PI.f64) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (PI.f64)) #s(literal 2 binary64)))
(.f64 #s(literal -1/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(literal -1/34992000 binary64)
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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 (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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 b b)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(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 (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx a a)
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 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 (.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 (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
#s(approx (- (* b b) (* a a)) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 b b)))
#s(approx (* a a) (*.f64 a a))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 b b) y-scale) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (PI.f64)))
#s(approx (* (PI) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (PI.f64)) (.f64 (.f64 b b) (PI.f64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.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 (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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 a a) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 #s(literal 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.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))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (/.f64 (pow.f64 (.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))))
#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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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))))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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)))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)))))) (/.f64 #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 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (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 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (*.f64 x-scale y-scale))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (*.f64 x-scale y-scale)))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (.f64 x-scale y-scale)))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 x-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (.f64 x-scale y-scale))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))))) (.f64 (.f64 a a) (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (PI.f64)) (*.f64 x-scale y-scale)))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (fma.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 a a))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (fma.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 a a)) (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal -1 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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.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 (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (*.f64 a a)))))
#s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 a a)) #s(literal 1 binary64))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) y-scale)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 angle (PI.f64)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (*.f64 a a)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (*.f64 a a) (PI.f64))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (PI.f64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (*.f64 a a)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (+.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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (/.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 a a) (-.f64 (+.f64 (/.f64 (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))) (+.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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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/2 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 a a)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (fma.f64 #s(literal 1/2 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 a a)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) (.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (*.f64 x-scale y-scale))))
#s(approx (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 angle (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (.f64 (.f64 a a) (*.f64 x-scale y-scale)))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (*.f64 x-scale y-scale))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 angle (PI.f64)) (.f64 x-scale y-scale)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (.f64 (.f64 a a) (.f64 x-scale y-scale))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 (.f64 a a) (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 (.f64 a a) (fma.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))) (/.f64 (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))) (.f64 a a)))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 a a) (.f64 x-scale y-scale))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 a a))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (PI.f64)) (.f64 (.f64 a a) (.f64 x-scale y-scale))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 a a))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 a a) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 a a)))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 a a) (.f64 x-scale y-scale))) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 a a) (.f64 x-scale y-scale))) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 a a) (.f64 x-scale y-scale))))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 a a)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 a a) (.f64 x-scale y-scale))) (.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 a a)))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 a a)))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 a a))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (* b b) (* x-scale x-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (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 (.f64 a (cos.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 (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))))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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)))))) (/.f64 #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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-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)))))) (/.f64 #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 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.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 (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 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (fma.f64 angle (.f64 (.f64 b b) (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))))))) (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (*.f64 x-scale y-scale)))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (fma.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 b b))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (fma.f64 #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 b b)) (.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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 b b)) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b b))))))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (*.f64 b b)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 (*.f64 b b) y-scale))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 (*.f64 b b) y-scale))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 b b)) (*.f64 angle (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (PI.f64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 b b))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 b b) (-.f64 (/.f64 (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)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 (.f64 b b) (-.f64 (+.f64 (/.f64 (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))) (+.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 (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (/.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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/2 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 b b)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (fma.f64 #s(literal 1/2 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 b b)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (.f64 (/.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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (* 1/90 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (PI.f64)) (*.f64 x-scale y-scale))))))
#s(approx (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (/.f64 (.f64 angle (PI.f64)) (.f64 x-scale y-scale)))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 angle (.f64 (.f64 b b) (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 (.f64 b b) (fma.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))) (/.f64 (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)))))))) (.f64 b b)))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (fma.f64 #s(literal 1/90 binary64) (/.f64 (PI.f64) (.f64 x-scale y-scale)) (fma.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 b b))))))))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (/.f64 (PI.f64) (.f64 x-scale y-scale)))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))))))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 (.f64 b b) (fma.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 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 b b))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale)))))))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 (.f64 b b) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale)) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 x-scale y-scale))))) (.f64 b b)))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (*.f64 x-scale y-scale))))))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 b b) (*.f64 x-scale y-scale)))))))))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 b b) (.f64 x-scale y-scale))) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)))))
#s(approx (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 b b)) (.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)))))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/34992000 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 x-scale y-scale)) (.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 (.f64 b b) (*.f64 x-scale y-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) angle))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (*.f64 b b) y-scale)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (.f64 b b)))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 a (*.f64 angle (PI.f64)))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (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 (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 2 binary64) (*.f64 b b))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))
#s(approx (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))))))))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64)))) (.f64 b b)))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (.f64 b b)))
#s(approx (pow (* b (cos (* 1/180 (* angle (PI))))) 2) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 (.f64 angle angle) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 b b)))
#s(approx (* b (cos (* 1/180 (* angle (PI))))) (+.f64 b (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 b (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* b (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI)))) #s(literal 1 binary64))
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (.f64 x-scale (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 x-scale (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) (.f64 x-scale (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 x-scale (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 x-scale (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 angle angle) (.f64 x-scale (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))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.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))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 x-scale x-scale))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 (.f64 angle angle) (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))) (.f64 (.f64 angle angle) (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))))))))))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 #s(literal -2 binary64) (*.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale))))))))))
#s(approx (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 y-scale y-scale)))))))))))))
#s(approx (pow (sin (* 1/180 (* angle (PI)))) 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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.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 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.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 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))))))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 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 (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) (*.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 (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 1/2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))) (/.f64 #s(literal 1 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))) (/.f64 #s(literal 1 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
#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)) (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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (-.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 (.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/1574640000 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/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (-.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 (.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))))) (fma.f64 (.f64 angle angle) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/1574640000 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/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (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 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (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)))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (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))) (fma.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))) (.f64 (.f64 angle angle) (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))))))))))))))
#s(approx (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 (.f64 angle angle) (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))) (fma.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))) (.f64 (.f64 angle angle) (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))) (fma.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 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.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)) (fma.f64 #s(literal 1/12597120000 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))) (fma.f64 #s(literal -1/396718580736000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/2777030065152000000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 8 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/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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/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 (.f64 angle angle) (fma.f64 #s(literal 1/32400 binary64) (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 angle angle) (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 (.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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/32400 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))))))))))))))))
#s(approx (pow (* (cos (* 1/180 (* angle (PI)))) (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/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 (.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)) (fma.f64 #s(literal 1/102036672000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/32400 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))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (fma.f64 #s(literal -1/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 (.f64 (PI.f64) (PI.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))))))))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (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 (.f64 angle angle) (-.f64 (.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64)))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (-.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 (.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/1574640000 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/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 (.f64 angle angle) (-.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 (.f64 angle angle) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 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/1574640000 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/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (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 (.f64 angle angle) (-.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 1 binary64) (.f64 x-scale x-scale))))
#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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (.f64 x-scale x-scale))))
#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 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)))) (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))))))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale)))))) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 y-scale y-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
#s(approx (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale))))))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (fma.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 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 (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 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale))))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (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 (/ angle 180) (*.f64 #s(literal 1/180 binary64) 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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (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 (-.f64 (/.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 #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)))))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (fma.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 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 (-.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 #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 (-.f64 (/.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 (.f64 a a) (.f64 y-scale y-scale))))
#s(approx (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)) (pow.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 (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 (/ (* angle (* (PI) (- (* b b) (* a a)))) (* x-scale y-scale)) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (*.f64 x-scale y-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (*.f64 x-scale y-scale))))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* 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 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.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 (* angle angle) (*.f64 angle angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (cos (* 1/180 (* angle (PI)))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))
#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)) (*.f64 y-scale y-scale)))
#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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.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 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale))) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #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 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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)) (.f64 x-scale x-scale)) (/.f64 (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 (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)) (*.f64 x-scale x-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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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 (/ (/ (+ (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 (/ (/ (+ (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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 (.f64 angle 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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 (.f64 (.f64 angle angle) angle) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (.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 (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (.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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 (.f64 angle 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 #s(literal -1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (.f64 x-scale y-scale))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) (*.f64 x-scale x-scale)))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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)))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (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 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) x-scale))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (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 (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (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 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) (.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 #s(literal 2 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (fma.f64 #s(literal 2 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) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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))) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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))))) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.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)))) (pow.f64 (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/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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 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))) (.f64 x-scale x-scale)))
#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 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 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 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (pow.f64 (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 (* (* x-scale x-scale) (* y-scale y-scale)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
#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 (.f64 x-scale x-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 y-scale y-scale)) (pow.f64 (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 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 x-scale x-scale) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))) (pow.f64 (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 (pow.f64 (.f64 x-scale (sin.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 x-scale x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.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)))) (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* x-scale y-scale) (*.f64 x-scale y-scale))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (/.f64 (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) 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))) y-scale))))))) x-scale))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/.f64 (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) 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))) y-scale)))))) x-scale))
#s(approx (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale)) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.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))) 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))) y-scale)))) x-scale)))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (/.f64 (.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))) 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))) y-scale)))) x-scale))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (/.f64 (fma.f64 #s(literal -1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) 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))) y-scale))) x-scale))
#s(approx (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 x-scale y-scale)))
#s(approx (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (*.f64 a a))))))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (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 (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (*.f64 x-scale x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) (.f64 x-scale x-scale)))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (*.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (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 (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (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 (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.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))))) (.f64 x-scale x-scale)))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.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)))))) (.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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (+.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 (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 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.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 (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 -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))))
#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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (sin.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (sin.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.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)) (.f64 y-scale y-scale))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 -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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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))) (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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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))) (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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 6 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 3 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) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.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)) (pow.f64 (.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.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 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (*.f64 x-scale x-scale)))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale)))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 angle (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (*.f64 a a))) y-scale))))))) x-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/90 binary64) (/.f64 (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)))))) x-scale)))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)))) x-scale)))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale)))) x-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale) (.f64 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) y-scale))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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)))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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))))))) (.f64 (cos.f64 (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx y-scale y-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (.f64 a a))) y-scale))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (.f64 a a))) (*.f64 y-scale y-scale)))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (fma.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))) (.f64 (.f64 y-scale y-scale) (fma.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 y-scale y-scale) (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 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))
#s(approx (- (/ (pow (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))) (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (fma.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (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 (+ (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (/.f64 (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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (cos.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 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 (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 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))))) (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 (sqrt (+ (* 4 (/ (pow (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) 2) (* (* x-scale x-scale) (* y-scale y-scale)))) (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 (.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)))) (pow.f64 (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/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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 y-scale y-scale)))
#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 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 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 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 y-scale y-scale) (pow.f64 (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 (.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 x-scale x-scale)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))
#s(approx (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 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (.f64 y-scale y-scale) (pow.f64 (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 (pow.f64 (.f64 y-scale (cos.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 y-scale y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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)))))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 y-scale y-scale) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(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 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 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 #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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (/.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) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (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 (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (/.f64 (.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))))))) y-scale))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (/.f64 (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)))))) y-scale))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.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)))) y-scale)))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (/.f64 (.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)))) y-scale))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (/.f64 (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))) y-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 y-scale (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (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 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
#s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale 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 (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* y-scale y-scale))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale 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 (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 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale 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 (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 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale 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 (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 -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))
#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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(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 (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)) (.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))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 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 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale))))))))
#s(approx (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 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 3 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale))))))
#s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))))
#s(approx (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))))
#s(approx (* angle (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))))) (.f64 #s(literal -1 binary64) (/.f64 (.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/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.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))))))) y-scale)))
#s(approx (+ (* 1/90 (/ (* (PI) (- (* b b) (* a a))) (* x-scale y-scale))) (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))))) (.f64 #s(literal -1 binary64) (/.f64 (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/34992000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale) (.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)))))) y-scale)))
#s(approx (* 2 (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.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 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale)))) y-scale)))
#s(approx (* (* angle angle) (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 angle angle) (fma.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 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale)))) y-scale)))
#s(approx (+ (* -1/11664000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale))) (* -1/34992000 (/ (* (* (* (PI) (PI)) (PI)) (- (* b b) (* a a))) (* x-scale y-scale)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.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 #s(literal 1/11664000 binary64) (/.f64 (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) x-scale))) y-scale)))

eval904.0ms (4.6%)

Memory: 28.3MiB live, 1 275.4MiB allocated; 290ms collecting garbage
Compiler: Compiled 143 301 to 15 174 computations (89.4% saved)

prune476.0ms (2.4%)

Memory

-6.8MiB live, 844.9MiB allocated; 105ms collecting garbage

Pruning

39 alts after pruning (39 fresh and 0 done)

	Pruned	Kept	Total
New	1 180	36	1 216
Fresh	21	3	24
Picked	5	0	5
Done	0	0	0
Total	1 206	39	1 245

Accuracy

81.5%

Counts

1 245 → 39

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
	11.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	12.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	8.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	13.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	13.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- ( 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	2.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	16.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
▶	13.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	8.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	14.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	24.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	10.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
	9.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))))) (PI.f64)))
	41.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶	47.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	47.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	31.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	25.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) (PI.f64)))
	30.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	26.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (exp.f64 (.f64 (log.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	8.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
▶	19.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	18.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	17.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 #s(approx ( y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	36.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	18.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))) (PI.f64)))
▶	10.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (PI.f64)))
	2.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
	36.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
▶	15.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))) (PI.f64)))
	11.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
	43.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	45.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
	22.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))

Compiler

Compiled 12 460 to 6 126 computations (50.8% saved)

series549.0ms (2.8%)

Memory

55.2MiB live, 1 039.7MiB allocated; 93ms collecting garbage

Counts

88 → 400

Calls

Call 1

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

Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -2 (* (pow b 2) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) #s(hole binary64 (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))
#s(approx (* (* a a) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (pow x-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 90 (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (pow a 2))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow a 2))) (* 2 (/ (pow x-scale 2) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow a 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (* (* b b) y-scale) #s(hole binary64 (* (pow b 2) y-scale)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI)))))))))
#s(approx (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) #s(hole binary64 (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))))))
#s(approx (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) #s(hole binary64 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))))
#s(approx (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) #s(hole binary64 (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))
#s(approx (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) #s(hole binary64 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))
#s(approx (* (* b b) x-scale) #s(hole binary64 (* (pow b 2) x-scale)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -2 y-scale) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* (pow b 2) y-scale)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -180 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 90 (/ (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* 1/16200 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* -2 (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale)) (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale)))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale))) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale))))) (/ y-scale x-scale))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 y-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* -1/32400 (* (pow angle 2) (* y-scale (pow (PI) 2)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 1))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* (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 (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ x-scale (* angle (* y-scale (PI)))) #s(hole binary64 (/ x-scale (* angle (* y-scale (PI))))))
#s(approx (* angle (* y-scale (PI))) #s(hole binary64 (* angle (* y-scale (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* y-scale (PI)))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (pow a 2)))) angle)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) angle)))
#s(approx (* angle (* x-scale (PI))) #s(hole binary64 (* angle (* x-scale (PI)))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) y-scale))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/16200 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (+ (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))) (* (pow angle 2) (* x-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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)))) (* (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)))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (* (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 (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 90 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (pow a 2))) (* 180 (/ x-scale (* y-scale (PI))))) angle))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -90 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) angle))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI))))) (* (pow x-scale 2) (- (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))) x-scale)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow x-scale 2)) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (PI))))) x-scale)))
#s(approx (* x-scale (PI)) #s(hole binary64 (* x-scale (PI))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* x-scale (- (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* x-scale (- (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* x-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* -2 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* x-scale (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (PI))))) (* 2 (/ (pow b 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* x-scale (+ (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI))))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (+ (* 180 (/ 1 (* angle (* y-scale (PI))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (* x-scale (- (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (PI))))) (* -2 (/ (pow b 2) (* angle (* y-scale (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* y-scale (PI)) #s(hole binary64 (* y-scale (PI))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) (pow y-scale 2))) (* 2 (* (pow a 2) (pow x-scale 2)))) y-scale)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* angle (PI)))) (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI)))))) y-scale)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* angle (PI)))) (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 180 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI)))))))) y-scale)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 180 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (PI))))) y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* y-scale (+ (* -2 (pow b 2)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* y-scale (+ (* -180 (/ x-scale (* angle (* (pow y-scale 2) (PI))))) (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* y-scale (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (* (pow b 2) x-scale) (* angle (* (pow y-scale 2) (PI))))) (* 2 (/ (pow b 2) (* angle (* x-scale (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (+ (* 180 (/ x-scale (* angle (* (pow y-scale 2) (PI))))) (* 180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI))))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (* 180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* (pow y-scale 2) (PI))))))))))

Calls

15 calls:

Time	Variable		Point	Expression
45.0ms	x-scale	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 2 x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ x-scale (* angle (* y-scale (PI))))) -180 (/ x-scale (* angle (* y-scale (PI)))) (* angle (* y-scale (PI))) (* y-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (* (* b b) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))
38.0ms	y-scale	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 2 x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ x-scale (* angle (* y-scale (PI))))) -180 (/ x-scale (* angle (* y-scale (PI)))) (* angle (* y-scale (PI))) (* y-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (* (* b b) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))
38.0ms	a	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 2 x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ x-scale (* angle (* y-scale (PI))))) -180 (/ x-scale (* angle (* y-scale (PI)))) (* angle (* y-scale (PI))) (* y-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (* (* b b) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))
34.0ms	b	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 2 x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ x-scale (* angle (* y-scale (PI))))) -180 (/ x-scale (* angle (* y-scale (PI)))) (* angle (* y-scale (PI))) (* y-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (* (* b b) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))
32.0ms	angle	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale (pow (cos (* 1/180 (* angle (PI)))) 2) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) 2 x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ x-scale (* angle (* y-scale (PI))))) -180 (/ x-scale (* angle (* y-scale (PI)))) (* angle (* y-scale (PI))) (* y-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (* (* b b) x-scale) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (pow (* a (sin (* 1/180 (* angle (PI))))) 2) (* a (sin (* 1/180 (* angle (PI))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))

rewrite476.0ms (2.4%)

Memory

11.6MiB live, 765.0MiB allocated; 102ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3112	96627
0	3241	91874
0	10818	89921

Stop Event

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

Counts

488 → 534

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(/.f64 #s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
(.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(literal -2 binary64)
(/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)
(.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
y-scale
(pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
(.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))
#s(literal -180 binary64)
(/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))
(.f64 angle (.f64 y-scale (PI.f64)))
(*.f64 y-scale (PI.f64))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(literal 90 binary64)
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)))
(.f64 (.f64 b b) y-scale)
(*.f64 b b)
b
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))
(/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale)
(.f64 (.f64 a a) (*.f64 x-scale x-scale))
(*.f64 a a)
a
(*.f64 x-scale x-scale)
(.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))
(-.f64 (.f64 b b) (.f64 a a))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))
(fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))
(.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (*.f64 x-scale (PI.f64)))))
(/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))
(.f64 angle (.f64 x-scale (PI.f64)))
(*.f64 x-scale (PI.f64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (*.f64 y-scale (PI.f64)))))
(/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))
(.f64 (.f64 b b) x-scale)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(literal -1/2 binary64)
(/.f64 (.f64 y-scale #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 y-scale #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -2 (* (pow b 2) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) #s(hole binary64 (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))
#s(approx (* (* a a) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (pow x-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 90 (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))) (pow a 2))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (+ (* -1/2 (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 2))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* (pow a 2) (- (+ (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 2 (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* a (sin (* 1/180 (* angle (PI)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (sin (* 1/180 (* angle (PI)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow a 2))) (* 2 (/ (pow x-scale 2) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (+ (* -1/2 (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6))) (+ (* -1/2 (/ (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (pow a 2))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (+ (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 4) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* -2 (/ (* (pow b 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 4))) (* 2 (/ (* (pow b 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow a 2) (+ (* 2 (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow b 2) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (pow a 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow a 2) (+ (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow a 2))) (* 2 (pow (sin (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (sin (* 1/180 (* angle (PI))))) (/ (* (pow b 2) (sin (* 1/180 (* angle (PI))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (* (* b b) y-scale) #s(hole binary64 (* (pow b 2) y-scale)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI))))))) (pow a 2))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI)))))))))
#s(approx (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) #s(hole binary64 (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI)))))))
#s(approx (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) #s(hole binary64 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))))
#s(approx (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) #s(hole binary64 (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))
#s(approx (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) #s(hole binary64 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))
#s(approx (* (* b b) x-scale) #s(hole binary64 (* (pow b 2) x-scale)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1/2 (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* (pow b 2) (+ (* -1/2 (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (* (pow b 2) (+ (* -1/2 (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4))) (* -1/2 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2))))))) (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 2))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* (pow b 2) (- (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))) (pow a 4)) (* -1 (/ (- (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (pow a 2)))))) (* 2 (/ (* y-scale (sin (* 1/180 (* angle (PI))))) (* (pow a 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -2 y-scale) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* (pow b 2) y-scale)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -180 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 90 (/ (- (* 2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ x-scale (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4))) (+ (* -1/2 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6))) (* -1/2 (/ (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI))))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (- (+ (* 2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (cos (* 1/180 (* angle (PI)))))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 6)))) (+ (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale (sin (* 1/180 (* angle (PI)))))))) (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) (* y-scale (sin (* 1/180 (* angle (PI)))))) (* x-scale (cos (* 1/180 (* angle (PI))))))) (* -2 (/ (* (pow a 2) (* y-scale (cos (* 1/180 (* angle (PI)))))) (* x-scale (sin (* 1/180 (* angle (PI))))))))) (pow b 4)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* (pow b 2) (+ (* 2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 2 (/ (* (pow a 2) (* y-scale (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow b 2)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* (pow b 2) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow b 2))) (* 2 (pow (cos (* 1/180 (* angle (PI)))) 2))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow b 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (sin (* 1/180 (* angle (PI)))) (* -1 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* 1/16200 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* -2 (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale)) (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale)))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale))) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale))))) (/ y-scale x-scale))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 y-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* -1/32400 (* (pow angle 2) (* y-scale (pow (PI) 2)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 1))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* -1/32400 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* 1/12597120000 (pow (PI) 4)) (+ (* 1/4199040000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* 1/180 (* angle (PI))) #s(hole binary64 (* 1/180 (* angle (PI)))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (* (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 (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ x-scale (* angle (* y-scale (PI)))) #s(hole binary64 (/ x-scale (* angle (* y-scale (PI))))))
#s(approx (* angle (* y-scale (PI))) #s(hole binary64 (* angle (* y-scale (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* y-scale (PI)))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (pow a 2)))) angle)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* 2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) angle)))
#s(approx (* angle (* x-scale (PI))) #s(hole binary64 (* angle (* x-scale (PI)))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) angle)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (+ (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (pow angle 2) (+ (* -1/2 (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (* -1/2 (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (* 360 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* 360 (/ (* (pow b 2) y-scale) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (+ (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* (pow angle 2) (- (* 180 (/ (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 64800 (/ (* (pow b 2) (* y-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))) (* x-scale (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) angle)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* 2 (* (pow b 2) y-scale))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (+ (* 2 (* (pow b 2) y-scale)) (* (pow angle 2) (+ (* y-scale (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))) (* (pow angle 2) (+ (* y-scale (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))) (* (pow angle 2) (* y-scale (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (* 2 (pow b 2))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (* 1/16200 (* (pow a 2) (pow (PI) 2))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) #s(hole binary64 (+ (* 2 (pow b 2)) (* (pow angle 2) (+ (* -1/16200 (* (pow b 2) (pow (PI) 2))) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (+ (* 2 (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))) (* 2 (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* 1/16200 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/16200 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* 2 (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) #s(hole binary64 (* (pow angle 2) (+ (* 1/16200 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/1574640000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* 2 (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8)))))) (* 2 (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* 1/32400 (* (pow a 2) (* (pow angle 2) (pow (PI) 2))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (* (pow angle 2) (pow (PI) 4)))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow a 2) (* (pow angle 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (PI))))) 2) #s(hole binary64 (* (pow angle 2) (+ (* 1/32400 (* (pow a 2) (pow (PI) 2))) (* (pow angle 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow angle 2) (+ (* (pow a 2) (* (pow angle 2) (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))))) (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))))))))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* 1/180 (* a (* angle (PI))))))
#s(approx (* a (sin (* 1/180 (* angle (PI))))) #s(hole binary64 (* angle (+ (* -1/34992000 (* a (* (pow angle 2) (pow (PI) 3)))) (* 1/180 (* a (PI)))))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* 1/180 (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (* x-scale (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* angle (+ (* 1/180 (* x-scale (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* x-scale (+ (* -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) (+ (* x-scale (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))) (* (pow angle 2) (* x-scale (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* 1/180 (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 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)))) (* (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)))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (* 1/180 (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* 1/22674816000000 (* (pow angle 2) (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* angle (+ (* 1/180 (* (PI) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (* (pow (PI) 7) (- (pow b 2) (pow a 2))))) (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))))
#s(approx (pow (cos (* 1/180 (* angle (PI)))) 2) #s(hole binary64 (pow (cos (* 1/180 (* angle (PI)))) 2)))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (* (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 (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) #s(hole binary64 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) #s(hole binary64 (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) #s(hole binary64 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) #s(hole binary64 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (/ (+ (* 90 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (pow a 2))) (* 180 (/ x-scale (* y-scale (PI))))) angle))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -90 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) (* (pow a 2) angle)))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (/ (- (* -2 (/ (* (pow b 2) y-scale) (* x-scale (PI)))) (* -2 (/ (* (pow b 2) x-scale) (* y-scale (PI))))) angle))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI))))) (* (pow x-scale 2) (- (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))) x-scale)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow x-scale 2)) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (PI)))))) x-scale)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow x-scale 2)) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (PI))))) x-scale)))
#s(approx (* x-scale (PI)) #s(hole binary64 (* x-scale (PI))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* x-scale (- (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* x-scale (- (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))) (* 180 (/ 1 (* angle (* y-scale (PI)))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* x-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* x-scale (+ (* -2 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* x-scale (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (PI))))) (* 2 (/ (pow b 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* x-scale (+ (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))) (* 180 (/ 1 (* angle (* y-scale (PI))))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (+ (* 180 (/ 1 (* angle (* y-scale (PI))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* (pow x-scale 2) (PI)))))) (* 2 (/ (pow b 2) (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (* x-scale (- (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (PI))))) (* -2 (/ (pow b 2) (* angle (* y-scale (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* y-scale (PI)) #s(hole binary64 (* y-scale (PI))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) (pow y-scale 2))) (* 2 (* (pow a 2) (pow x-scale 2)))) y-scale)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* angle (PI)))) (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI)))))) y-scale)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (/ (+ (* -180 (/ x-scale (* angle (PI)))) (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 180 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI)))))))) y-scale)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 180 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (PI))))) (* 2 (/ (* (pow b 2) (pow y-scale 2)) (* (pow a 2) (* angle (* x-scale (PI))))))) y-scale)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (/ (- (* 2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (PI))))) y-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* y-scale (+ (* -2 (pow b 2)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* y-scale (+ (* -180 (/ x-scale (* angle (* (pow y-scale 2) (PI))))) (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* y-scale (+ (* -180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* y-scale (+ (* -2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))) (* 2 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (* (pow b 2) x-scale) (* angle (* (pow y-scale 2) (PI))))) (* 2 (/ (pow b 2) (* angle (* x-scale (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (+ (* 180 (/ x-scale (* angle (* (pow y-scale 2) (PI))))) (* 180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI))))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (* 180 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow b 2) (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* (pow y-scale 2) (PI)))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* (pow y-scale 2) (PI))))))))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 #s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))) (neg.f64 (.f64 (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(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
(.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(literal -2 binary64)
(/.f64 (neg.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (neg.f64 x-scale))
(/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)
(.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
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)))
(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))
angle
(PI.f64)
#s(literal 2 binary64)
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
(.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))
#s(literal -180 binary64)
(/.f64 (neg.f64 x-scale) (neg.f64 (.f64 angle (.f64 y-scale (PI.f64)))))
(/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))
(.f64 angle (.f64 y-scale (PI.f64)))
(*.f64 y-scale (PI.f64))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(literal 90 binary64)
(/.f64 (neg.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))) (neg.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)))) (neg.f64 x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)
(+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) x-scale) (/.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale)) x-scale))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) (.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))))))
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)))
(+.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale)))
(.f64 (.f64 b b) y-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)))
b
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))
(/.f64 (neg.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale)
(.f64 (.f64 a a) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 a x-scale) #s(literal 2 binary64))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
a
(*.f64 (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 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.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 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))) (-.f64 (.f64 (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))) (.f64 (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))))
(fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))
(+.f64 (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a))))
(.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (neg.f64 (*.f64 a a)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a))
(-.f64 (/.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 a a)) (/.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 a a)))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (*.f64 y-scale (PI.f64)))))))))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (*.f64 x-scale (PI.f64)))))
(.f64 (/.f64 (.f64 b b) angle) (/.f64 y-scale (*.f64 x-scale (PI.f64))))
(/.f64 (neg.f64 (.f64 (.f64 b b) y-scale)) (neg.f64 (.f64 angle (.f64 x-scale (PI.f64)))))
(/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))
(.f64 angle (.f64 x-scale (PI.f64)))
(*.f64 x-scale (PI.f64))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (*.f64 y-scale (PI.f64)))))
(.f64 (/.f64 (.f64 b b) angle) (/.f64 x-scale (*.f64 y-scale (PI.f64))))
(/.f64 (neg.f64 (.f64 (.f64 b b) x-scale)) (neg.f64 (.f64 angle (.f64 y-scale (PI.f64)))))
(/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))
(.f64 (.f64 b b) x-scale)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(literal -1/2 binary64)
(.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (neg.f64 (.f64 y-scale #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))) (neg.f64 (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
(/.f64 (.f64 y-scale #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
(.f64 y-scale #s(approx (+ ( 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))
(.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
(.f64 (.f64 a a) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)))
(.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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 (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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 b b) y-scale) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -2 binary64) (.f64 (*.f64 b b) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) (/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale))
#s(approx (* (* a a) (* x-scale x-scale)) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))
#s(approx (* a a) (*.f64 a a))
#s(approx a a)
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (PI.f64)))
#s(approx (* (PI) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (PI.f64)) (.f64 (.f64 b b) (PI.f64))))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
#s(approx (- (* b b) (* a a)) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 b b)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a)))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a)))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 b b)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 b b))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(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 (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) #s(literal 2 binary64)))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))
#s(approx (pow (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 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 (.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 (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 a a)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale x-scale) y-scale)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 angle (PI.f64)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (*.f64 a a)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (*.f64 a a) (PI.f64))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (PI.f64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (*.f64 a a)))))
#s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 a a)) #s(literal 1 binary64))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 a a) (fma.f64 #s(literal 2 binary64) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 a a))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 a a) (fma.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 a a)) (.f64 #s(literal 2 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal -1 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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.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 (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (/.f64 (.f64 (.f64 b b) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))))
#s(approx (* (* b b) y-scale) (.f64 (.f64 b b) y-scale))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))))) (*.f64 a a)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64))))))))
#s(approx (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* (* b b) y-scale) (* angle (* x-scale (PI)))) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))
#s(approx (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))
#s(approx (* (* b b) x-scale) (.f64 (.f64 b b) x-scale))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 a a)))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 a a)))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 a a))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 a a) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (*.f64 b b)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 (*.f64 b b) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) y-scale (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 (.f64 b b) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 b b)) (*.f64 angle (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (PI.f64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 b b))))))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 b b))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 b b) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (pow.f64 b #s(literal 4 binary64)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 (.f64 b b) (fma.f64 #s(literal 2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 b b))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 (.f64 b b) (fma.f64 #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 b b)) (.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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 b b)) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (*.f64 (PI.f64) (PI.f64)))) x-scale))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 #s(literal 1/16200 binary64) (/.f64 (.f64 y-scale (*.f64 (PI.f64) (PI.f64))) x-scale))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/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 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/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))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (/.f64 y-scale x-scale))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (.f64 (PI.f64) (PI.f64)))) x-scale) (/.f64 y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (.f64 (.f64 angle angle) (/.f64 (fma.f64 y-scale (fma.f64 #s(literal 1/12597120000 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) (.f64 y-scale (fma.f64 #s(literal -1/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 y-scale x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 y-scale (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 y-scale (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 y-scale (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal 1/12597120000 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) (.f64 y-scale (fma.f64 #s(literal -1/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) #s(literal 1 binary64))
#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 (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (* angle (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (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 (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (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 (/ x-scale (* angle (* y-scale (PI)))) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))))
#s(approx (* angle (* y-scale (PI))) (.f64 angle (.f64 y-scale (PI.f64))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 y-scale (PI.f64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (*.f64 a a)))) angle))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (.f64 (*.f64 a a) angle))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (.f64 (.f64 a a) angle)))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) angle))
#s(approx (* angle (* x-scale (PI))) (.f64 angle (.f64 x-scale (PI.f64))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) angle))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal -1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) angle))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal 360 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))))) (.f64 #s(literal 64800 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale (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 x-scale (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) angle))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (*.f64 b b) y-scale)))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) y-scale) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (.f64 b b)))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)))))))))))))
#s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (fma.f64 #s(literal 2 binary64) (.f64 b b) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))))))))))))
#s(approx (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/1574640000 binary64) (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/396718580736000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)) (.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64)))))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))))))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) 2) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (.f64 (.f64 a a) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (.f64 #s(literal 1/32400 binary64) (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64)))))))
#s(approx (pow (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 a (*.f64 angle (PI.f64)))))
#s(approx (* a (sin (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* 1/180 (* angle (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (.f64 x-scale (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 x-scale (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) (.f64 x-scale (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 (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 x-scale (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 x-scale (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 angle angle) (.f64 x-scale (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))))))))))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 #s(literal 1/180 binary64) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/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))) (fma.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.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))))))))))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (.f64 angle angle) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (.f64 y-scale (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) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))
#s(approx (cos (* 1/180 (* angle (PI)))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#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 (sin (* 1/180 (* angle (PI)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))
#s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (.f64 a a)) (.f64 #s(literal 180 binary64) (/.f64 x-scale (.f64 y-scale (PI.f64))))) angle)))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal -90 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (.f64 (*.f64 a a) angle))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 y-scale (PI.f64))))) (.f64 (*.f64 a a) angle))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale (PI.f64)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (*.f64 y-scale (PI.f64))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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)))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (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 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))
#s(approx (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64)))))))) x-scale))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) x-scale))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64)))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) x-scale))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (*.f64 angle (PI.f64))))) x-scale))
#s(approx (* x-scale (PI)) (*.f64 x-scale (PI.f64)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (*.f64 a a))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale)))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 x-scale (-.f64 (.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 x-scale (-.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64)))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64)))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 x-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (*.f64 x-scale x-scale)))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64)))))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))) (fma.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (-.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (PI.f64))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 y-scale (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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))))))) (.f64 (cos.f64 (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* y-scale (PI)) (*.f64 y-scale (PI.f64)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (*.f64 x-scale x-scale)))) y-scale))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) y-scale))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (PI.f64))) (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))))) y-scale))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))) y-scale))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))) y-scale))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (PI.f64))))) y-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (.f64 b b) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (*.f64 y-scale y-scale))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 b b))))))
#s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (fma.f64 #s(literal 180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))))))))))
#s(approx (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (*.f64 y-scale y-scale) (PI.f64))))))))))
#s(approx (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (*.f64 y-scale y-scale) (PI.f64))))))))))
#s(approx (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 (*.f64 y-scale y-scale) (PI.f64)))))))))

eval748.0ms (3.8%)

Memory: -6.2MiB live, 1 390.0MiB allocated; 159ms collecting garbage
Compiler: Compiled 56 263 to 6 114 computations (89.1% saved)

prune326.0ms (1.7%)

Memory

11.2MiB live, 675.9MiB allocated; 39ms collecting garbage

Pruning

45 alts after pruning (43 fresh and 2 done)

	Pruned	Kept	Total
New	463	15	478
Fresh	6	28	34
Picked	3	2	5
Done	0	0	0
Total	472	45	517

Accuracy

81.8%

Counts

517 → 45

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
▶	11.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	12.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	8.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	13.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	13.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- ( 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	2.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	16.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
▶	15.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	16.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
▶	9.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	8.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	14.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	24.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	10.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
	41.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	46.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) x-scale))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
✓	47.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
▶	47.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	31.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	30.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	8.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	19.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	20.8%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))))) (PI.f64)))
	20.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64)))
	21.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 #s(approx ( a (sin (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 a (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	18.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	21.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	18.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (PI.f64)))
	2.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
▶	36.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
✓	15.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
	20.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) y-scale))))) (PI.f64)))
	6.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
	20.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 x-scale (-.f64 (.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64))))))))))) (PI.f64)))
	16.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64)))
	12.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))) (PI.f64)))
	11.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
	43.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	45.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
	22.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))

Compiler

Compiled 14 334 to 7 166 computations (50% saved)

series436.0ms (2.2%)

Memory

1.8MiB live, 766.7MiB allocated; 52ms collecting garbage

Counts

97 → 338

Calls

Call 1

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

Outputs
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -2 (* (pow b 2) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) #s(hole binary64 (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))
#s(approx (* (* a a) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (pow x-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* -1 (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (* a x-scale) #s(hole binary64 (* a x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* 2 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow a 2))) (* 2 (/ (pow x-scale 2) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (* (* b b) y-scale) #s(hole binary64 (* (pow b 2) y-scale)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -2 y-scale) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* (pow b 2) y-scale)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (* 2 (/ 1 (pow x-scale 2)))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* 1/16200 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* -2 (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale)) (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale)))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale))) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale))))) (/ y-scale x-scale))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 y-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* -1/32400 (* (pow angle 2) (* y-scale (pow (PI) 2)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 2) (* y-scale (+ (* -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 (* 1/180 (* angle (PI)))))
#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 (cos (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ y-scale (* angle (* x-scale (PI)))) #s(hole binary64 (/ y-scale (* angle (* x-scale (PI))))))
#s(approx (* angle (* x-scale (PI))) #s(hole binary64 (* angle (* x-scale (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 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 (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* y-scale (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (PI)) #s(hole binary64 (* x-scale (PI))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) (pow y-scale 2))) (* 2 (* (pow a 2) (pow x-scale 2)))) y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* y-scale (+ (* -2 (pow b 2)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2)))))))

Calls

15 calls:

Time	Variable		Point	Expression
27.0ms	a	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ y-scale (* angle (* x-scale (PI))))) -180 (/ y-scale (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) 2 (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* -1 (* a a)) -1 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) (* 2 (/ (pow (* a x-scale) 2) y-scale)) (/ (pow (* a x-scale) 2) y-scale) (pow (* a x-scale) 2) (* a x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
27.0ms	angle	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ y-scale (* angle (* x-scale (PI))))) -180 (/ y-scale (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) 2 (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* -1 (* a a)) -1 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) (* 2 (/ (pow (* a x-scale) 2) y-scale)) (/ (pow (* a x-scale) 2) y-scale) (pow (* a x-scale) 2) (* a x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
26.0ms	a	@	inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ y-scale (* angle (* x-scale (PI))))) -180 (/ y-scale (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) 2 (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* -1 (* a a)) -1 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) (* 2 (/ (pow (* a x-scale) 2) y-scale)) (/ (pow (* a x-scale) 2) y-scale) (pow (* a x-scale) 2) (* a x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
25.0ms	b	@	0	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ y-scale (* angle (* x-scale (PI))))) -180 (/ y-scale (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) 2 (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* -1 (* a a)) -1 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) (* 2 (/ (pow (* a x-scale) 2) y-scale)) (/ (pow (* a x-scale) 2) y-scale) (pow (* a x-scale) 2) (* a x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))
25.0ms	x-scale	@	-inf	((* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (cos (* 1/180 (* angle (PI)))) (* 1/180 (* angle (PI))) 1/180 (* angle (PI)) angle (PI) (sin (* 1/180 (* angle (PI)))) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (* -180 (/ y-scale (* angle (* x-scale (PI))))) -180 (/ y-scale (* angle (* x-scale (PI)))) (* angle (* x-scale (PI))) (* x-scale (PI)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (* (* b b) y-scale) (* b b) b (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) 2 (/ (* (* a a) (* x-scale x-scale)) y-scale) (* (* a a) (* x-scale x-scale)) (* a a) a (* x-scale x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* -1 (* a a)) -1 (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/ (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) x-scale) (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (pow (* a x-scale) 2) y-scale))) (* 2 (/ (pow (* a x-scale) 2) y-scale)) (/ (pow (* a x-scale) 2) y-scale) (pow (* a x-scale) 2) (* a x-scale) (* angle (* (PI) (- (* b b) (* a a)))) (* (PI) (- (* b b) (* a a))) (- (* b b) (* a a)) (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (* 2 (/ (* a a) (* y-scale y-scale))) (/ (* a a) (* y-scale y-scale)) (* y-scale y-scale) (* 2 (/ (* b b) (* x-scale x-scale))) (/ (* b b) (* x-scale x-scale)) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (* 2 (- (pow b 2) (pow a 2))) (- (pow b 2) (pow a 2)) (pow b 2) (pow a 2) (sin (* (/ angle 180) (PI))) (* (/ angle 180) (PI)) (/ angle 180) (cos (* (/ angle 180) (PI))))

rewrite1.5s (7.5%)

Memory

-196.1MiB live, 621.6MiB allocated; 1.7s collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2831	107407
0	2950	100741
0	9947	98592

Stop Event

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

Counts

435 → 500

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(/.f64 #s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale)))
(.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))
#s(literal -2 binary64)
(/.f64 #s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale)
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)
y-scale
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
(.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))
#s(literal -180 binary64)
(/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))
(.f64 angle (.f64 x-scale (PI.f64)))
(*.f64 x-scale (PI.f64))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))
#s(literal 90 binary64)
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale)))
(.f64 (.f64 b b) y-scale)
(*.f64 b b)
b
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))
#s(literal 2 binary64)
(/.f64 (.f64 (.f64 a a) (*.f64 x-scale x-scale)) y-scale)
(.f64 (.f64 a a) (*.f64 x-scale x-scale))
(*.f64 a a)
a
(*.f64 x-scale x-scale)
(.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))
(.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))
#s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))
(.f64 #s(literal -1 binary64) (.f64 a a))
#s(literal -1 binary64)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale)))
(.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))
(/.f64 (pow.f64 (*.f64 a x-scale) #s(literal 2 binary64)) y-scale)
(pow.f64 (*.f64 a x-scale) #s(literal 2 binary64))
(*.f64 a x-scale)
(.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))
(-.f64 (.f64 b b) (.f64 a a))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
(.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))
(/.f64 (.f64 b b) (.f64 x-scale x-scale))
(/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
(/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
(.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 angle #s(literal 180 binary64))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) #s(hole binary64 (* 180 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI)))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) #s(hole binary64 (/ (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (PI))))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) #s(hole binary64 (atan (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))))) (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow a 2) (+ (* 1/2 (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (* (pow a 2) (+ (* 1/2 (* (pow a 2) (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2)))) (pow b 2)))))) (* 1/2 (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow b 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (pow b 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (+ (* 90 (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (* (pow a 2) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 2))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* (pow a 2) (- (+ (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* (pow a 2) (- (/ (* (pow a 2) (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))) (pow b 4)) (* -1 (/ (- (* 2 (/ x-scale (* angle (* (pow b 2) (* y-scale (PI)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI))))))) (pow b 2)))))) (* 2 (/ y-scale (* angle (* (pow b 2) (* x-scale (PI)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) x-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ (* (pow b 2) y-scale) x-scale)) (* 2 (/ (* (pow a 2) x-scale) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -2 (* (pow b 2) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) #s(hole binary64 (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) #s(hole binary64 (/ (* (pow a 2) (pow x-scale 2)) y-scale)))
#s(approx (* (* a a) (* x-scale x-scale)) #s(hole binary64 (* (pow a 2) (pow x-scale 2))))
#s(approx (* a a) #s(hole binary64 (pow a 2)))
#s(approx a #s(hole binary64 a))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (pow b 2) (PI)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (+ (* -1 (* (pow a 2) (* angle (PI)))) (* angle (* (pow b 2) (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (PI))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (+ (* -1 (* (pow a 2) (PI))) (* (pow b 2) (PI)))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (pow b 2)))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (+ (* -1 (pow a 2)) (pow b 2))))
#s(approx (* -1 (* a a)) #s(hole binary64 (* -1 (pow a 2))))
#s(approx (* a x-scale) #s(hole binary64 (* a x-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* -1/2 (* (* (pow a 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow a 2) (- (+ (* (pow a 2) (- (* 1/4 (* (* (pow a 2) (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* -2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) #s(hole binary64 (* 2 (/ (pow a 2) (pow y-scale 2)))))
#s(approx (/ (* a a) (* y-scale y-scale)) #s(hole binary64 (/ (pow a 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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (pow a 2))) (+ (* 1/2 (/ (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))) (pow a 6))) (* 1/2 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/ (* (pow b 2) (* x-scale (* y-scale (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) (pow a 4))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (+ (* 90 (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6))) (* 90 (/ (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI)))))) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ x-scale (* angle (* y-scale (PI)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI))))))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4)))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (+ (* 2 (/ (* (pow b 2) y-scale) (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 4) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 6)))) (+ (* -1 (/ (* (pow b 2) (- (* 2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (pow b 2) x-scale) (* angle (* y-scale (PI))))))) (pow a 4))) (* 2 (/ (* (pow b 2) x-scale) (* (pow a 2) (* angle (* y-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) y-scale))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (* (pow a 2) x-scale))) (* 2 (/ x-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow a 2))) (* 2 (/ (pow x-scale 2) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* -1 (* (pow a 2) (* angle (PI))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow a 2) (+ (* -1 (* angle (PI))) (/ (* angle (* (pow b 2) (PI))) (pow a 2))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* -1 (* (pow a 2) (PI)))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow a 2) (+ (* -1 (PI)) (/ (* (pow b 2) (PI)) (pow a 2))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow a 2) (- (/ (pow b 2) (pow a 2)) 1))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow a 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow a 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow y-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow a 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow a 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow a 2) (pow x-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow a 2) (+ (* -2 (/ (pow b 2) (* (pow a 2) (pow x-scale 2)))) (* 2 (/ 1 (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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (* (pow b 2) (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))))) (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* -1/2 (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* (pow b 2) (+ (* 1/2 (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) (* (pow b 2) (+ (* 1/2 (* (pow b 2) (- (* -1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* -1 (/ (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2)))) (pow a 2)))))) (* 1/2 (- (* 1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* -1 (/ (- (* -1 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (pow a 4) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow a 2))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (+ (* 90 (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (* (pow b 2) (+ (* 90 (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4))) (* 90 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 2))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (+ (* -2 (/ x-scale (* angle (* y-scale (PI))))) (* (pow b 2) (- (+ (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* (pow b 2) (- (/ (* (pow b 2) (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))) (pow a 4)) (* -1 (/ (- (* 2 (/ y-scale (* (pow a 2) (* angle (* x-scale (PI)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI))))))) (pow a 2)))))) (* 2 (/ x-scale (* (pow a 2) (* angle (* y-scale (PI)))))))))))
#s(approx (* (* b b) y-scale) #s(hole binary64 (* (pow b 2) y-scale)))
#s(approx b #s(hole binary64 b))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (- (pow b 2) (pow a 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* -1/2 (* (* (pow b 2) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* (pow b 2) (- (+ (* (pow b 2) (- (* 1/4 (* (* (pow b 2) (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))))))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (+ (* -2 (/ (pow b 2) (pow x-scale 2))) (* 2 (/ (pow a 2) (pow y-scale 2))))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) #s(hole binary64 (* 2 (/ (pow b 2) (pow x-scale 2)))))
#s(approx (/ (* b b) (* x-scale x-scale)) #s(hole binary64 (/ (pow b 2) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (+ (* 1/2 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* 1/2 (/ (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))) (pow b 4))) (+ (* 1/2 (/ (- (* 1/4 (* (/ (* x-scale (* y-scale (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (* -1 (* (pow a 2) (- (* -1/2 (* (/ (* x-scale (* y-scale (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (* -1 (* (pow a 2) (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))) (pow b 6))) (* 1/2 (/ (- (/ (* x-scale (* y-scale (- (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (+ (* 1/2 (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* -1 (/ (* (pow a 2) (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (pow b 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (+ (* -180 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 90 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (+ (* 90 (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6))) (* 90 (/ (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI)))))) (pow b 2))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI))))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4)))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (- (+ (* -2 (/ y-scale (* angle (* x-scale (PI))))) (+ (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow b 2) (* y-scale (PI)))))) (/ (* (pow a 4) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 6)))) (+ (* -1 (/ (* (pow a 2) (- (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (PI))))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* x-scale (PI))))))) (pow b 4))) (* 2 (/ (* (pow a 2) y-scale) (* angle (* (pow b 2) (* x-scale (PI))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ y-scale x-scale)) (* 2 (/ (* (pow a 2) x-scale) (* (pow b 2) y-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow b 2) (+ (* -2 y-scale) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* (pow b 2) y-scale)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* (pow b 2) (+ (* -1 (/ (* (pow a 2) (* angle (PI))) (pow b 2))) (* angle (PI))))))
#s(approx (* (PI) (- (* b b) (* a a))) #s(hole binary64 (* (pow b 2) (+ (PI) (* -1 (/ (* (pow a 2) (PI)) (pow b 2)))))))
#s(approx (- (* b b) (* a a)) #s(hole binary64 (* (pow b 2) (+ 1 (* -1 (/ (pow a 2) (pow b 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* -1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* (pow b 2) (- (+ (* 1/4 (* (/ (* (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (pow b 6)) (sqrt (/ 1 (pow (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)) 3))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow y-scale 2))) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (+ (* 1/2 (* (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) (pow b 2)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (* 1/2 (* (/ (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)) (* 1/4 (/ (pow (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)))))) 2) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))))) (pow b 4)) (sqrt (/ 1 (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2)))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (* (pow b 2) (- (* 2 (/ (pow a 2) (* (pow b 2) (pow y-scale 2)))) (* 2 (/ 1 (pow x-scale 2)))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) x-scale))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) x-scale))))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (pow b 2))) (* 2 (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* (pow b 2) (+ (* -2 (/ (* (pow a 2) (sin (* 1/180 (* angle (PI))))) (pow b 2))) (* 2 (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 2 (- (pow b 2) (pow a 2))) #s(hole binary64 (* (pow b 2) (+ 2 (* -2 (/ (pow a 2) (pow b 2)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2)))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/881596846080000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/1469328076800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (+ (* -1/4407984230400000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2)))) (* -1/30855889612800000000 (* (pow (PI) 7) (- (pow b 2) (pow a 2))))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))))))) (* (PI) (- (pow b 2) (pow a 2))))) (+ (* 180 (/ (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* -1/11664000 (* (pow (PI) 3) (- (pow b 2) (pow a 2)))) (* -1/34992000 (* (pow (PI) 3) (- (pow b 2) (pow a 2))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))) (* (PI) (- (pow b 2) (pow a 2))))) (* 32400 (/ (* x-scale (* y-scale (* (+ (* 1/22674816000000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (+ (* 1/4534963200000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))) (* 1/2267481600000 (* (pow (PI) 5) (- (pow b 2) (pow a 2)))))) (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2))))))) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)))))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))))) angle)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -180 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (+ (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (* (pow angle 2) (+ (* 1/2 (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (* 1/2 (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -360 (/ y-scale (* angle (* x-scale (PI)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -360 (/ y-scale (* x-scale (PI)))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* (pow angle 2) (- (+ (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (* (pow angle 2) (- (* 180 (/ (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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)))))))))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* -1/881596846080000000 (pow (PI) 7)) (+ (* -1/1469328076800000000 (pow (PI) 7)) (+ (* -1/4407984230400000000 (pow (PI) 7)) (* -1/30855889612800000000 (pow (PI) 7)))))) (* x-scale (pow (PI) 2)))) (+ (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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)))))))))))) (PI))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))) (PI))) (* 180 (/ (* (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5)))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI)))))))) (+ (* -64800 (/ (* y-scale (+ (* 1/22674816000000 (pow (PI) 5)) (+ (* 1/4534963200000 (pow (PI) 5)) (* 1/2267481600000 (pow (PI) 5))))) (* x-scale (pow (PI) 2)))) (* 180 (/ (* (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3))) (- (* 180 (/ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (PI))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2)))))) (PI))))))) (* -64800 (/ (* y-scale (+ (* -1/11664000 (pow (PI) 3)) (* -1/34992000 (pow (PI) 3)))) (* x-scale (pow (PI) 2))))))) angle)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -2 (/ y-scale x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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)))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* 1/32400 (/ (pow (PI) 2) (pow y-scale 2))) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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))))))))))) (* (pow angle 2) (+ (* x-scale (* y-scale (- (* -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 (* (pow x-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 x-scale 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 angle 2) (* x-scale (* y-scale (- (+ (* 1/2040733440000000 (/ (pow (PI) 6) (pow y-scale 2))) (* 1/1224440064000000 (/ (pow (PI) 6) (pow y-scale 2)))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/2 (* (pow x-scale 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 (* (pow x-scale 4) (* (- (+ (* -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 x-scale 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))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* 1/16200 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* -2 (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale)) (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (+ (* -2 (/ y-scale x-scale)) (* (pow angle 2) (+ (* 1/16200 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (* -2 (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale)) (* -2 (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale)))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* -1/32400 (/ (* (pow angle 2) (* y-scale (pow (PI) 2))) x-scale)) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (/ (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))) x-scale))) (/ y-scale x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (+ (* (pow angle 2) (+ (* -1/32400 (/ (* y-scale (pow (PI) 2)) x-scale)) (* (pow angle 2) (+ (/ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) x-scale) (/ (* (pow angle 2) (* y-scale (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))))) x-scale))))) (/ y-scale x-scale))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 y-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* -1/32400 (* (pow angle 2) (* y-scale (pow (PI) 2)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (+ y-scale (* (pow angle 2) (+ (* -1/32400 (* y-scale (pow (PI) 2))) (* (pow angle 2) (+ (* y-scale (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (* (pow angle 2) (* y-scale (+ (* -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 (* 1/180 (* angle (PI)))))
#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 (cos (* 1/180 (* angle (PI)))) #s(hole binary64 1))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))))
#s(approx (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/24488801280000000 (* (pow angle 2) (pow (PI) 6))) (* 1/25194240000 (pow (PI) 4)))))))))
#s(approx (* angle (PI)) #s(hole binary64 (* angle (PI))))
#s(approx angle #s(hole binary64 angle))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* 1/22674816000000 (* (pow angle 2) (pow (PI) 5)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (* angle (+ (* 1/180 (PI)) (* (pow angle 2) (+ (* -1/34992000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/30855889612800000000 (* (pow angle 2) (pow (PI) 7))) (* 1/22674816000000 (pow (PI) 5))))))))))
#s(approx (/ y-scale (* angle (* x-scale (PI)))) #s(hole binary64 (/ y-scale (* angle (* x-scale (PI))))))
#s(approx (* angle (* x-scale (PI))) #s(hole binary64 (* angle (* x-scale (PI)))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (* 2 (/ (pow a 2) (pow y-scale 2))) (* 2 (/ (pow b 2) (pow x-scale 2)))))) (* angle (* (PI) (- (pow b 2) (pow a 2)))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) #s(hole binary64 (* angle (* (PI) (- (pow b 2) (pow a 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 2 (/ (pow a 2) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))) (* (pow angle 2) (- (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (+ (* (pow angle 2) (- (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))))) (+ (* 2 (* (- (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow y-scale 2)) (/ (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 1/2 (/ (* (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (pow x-scale 2)))))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* 1/2 (/ (- (+ (* 2 (* (- (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2))) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) (pow y-scale 2))) (/ (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))) (/ (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))))) (* 2 (/ (pow b 2) (pow x-scale 2))))))
#s(approx (/ (/ (* (* (* 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 (/ angle 180) #s(hole binary64 (* 1/180 angle)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* 1/2 (/ (* x-scale (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2)) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-scale 2))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) #s(hole binary64 (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) #s(hole binary64 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) #s(hole binary64 (* y-scale (pow (cos (* 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 (cos (* 1/180 (* angle (PI)))) #s(hole binary64 (cos (* 1/180 (* angle (PI))))))
#s(approx (sin (* 1/180 (* angle (PI)))) #s(hole binary64 (sin (* 1/180 (* angle (PI))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (sqrt (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (pow (- (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))))
#s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) #s(hole binary64 (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) x-scale))))
#s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))
#s(approx (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) #s(hole binary64 (* 2 (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* 1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* 1/2 (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow x-scale 2) (+ (* -1/4 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/8 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (/ (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -2 (/ (* y-scale (cos (* 1/180 (* angle (PI))))) (sin (* 1/180 (* angle (PI)))))) (* (pow x-scale 2) (+ (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI))))))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI))))))))) (/ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* -1/2 (/ (* (pow x-scale 2) (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4)))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (+ (* y-scale (- (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (pow y-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)))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (pow x-scale 2) (+ (* -1/2 (/ (* y-scale (- (/ (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 (cos (* 1/180 (* angle (PI)))) 4))))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* (pow x-scale 2) (* y-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (cos (* 1/180 (* angle (PI)))) 4))))))) (pow (cos (* 1/180 (* angle (PI)))) 6)))))))) x-scale)))
#s(approx x-scale #s(hole binary64 x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -180 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 180 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (PI)) #s(hole binary64 (* x-scale (PI))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -2 (/ (* (pow b 2) y-scale) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (PI) (- (pow b 2) (pow a 2)))))) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) y-scale)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) y-scale))) x-scale)))
#s(approx (* x-scale x-scale) #s(hole binary64 (pow x-scale 2)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* -1/2 (/ (* (pow x-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* (pow x-scale 2) (- (+ (* (pow x-scale 2) (- (* 1/4 (/ (* (pow x-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (+ (* 2 (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 2 (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (- (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2))))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (/ (+ (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -1 (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (* 1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* 180 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* x-scale (+ (* -180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* 2 (/ (* (pow a 2) x-scale) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* x-scale (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* (pow x-scale 2) (+ (* -2 (/ (* (pow b 2) y-scale) (pow x-scale 2))) (* 2 (/ (pow a 2) y-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (pow x-scale 2)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) (pow x-scale 2))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (/ (- (* 1/2 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 6) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 4) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) (* (pow x-scale 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))))) (pow x-scale 2))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))) x-scale))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* y-scale (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* -1/8 (/ (* y-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* y-scale (- (pow (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) 2))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))))) (+ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/8 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/4 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (* 1/2 (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) x-scale))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))) (/ (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2))))) x-scale))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (pow y-scale 3) (+ (* -1/4 (/ (* (pow y-scale 8) (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (* (pow y-scale 4) (pow (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 6) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (+ (* -1/4 (/ (* (pow y-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (pow x-scale 4) (pow (sin (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow y-scale 3) (- (pow (cos (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow y-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) 2)) (pow (sin (* 1/180 (* angle (PI)))) 4))))) (* (pow x-scale 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* y-scale (+ (* 1/2 (/ (* (pow y-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)))) 2))) (pow (cos (* 1/180 (* angle (PI)))) 2)))))) x-scale))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -180 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) (* angle (* y-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow b 2) y-scale) (* angle (* (pow x-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (+ (* -2 (/ (pow a 2) y-scale)) (* 2 (/ (* (pow b 2) y-scale) (pow x-scale 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* -1/4 (/ (* x-scale (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* 1/8 (/ (* x-scale (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2))))))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3) (- (pow b 2) (pow a 2))))))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (- (pow b 2) (pow a 2)))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/8 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/4 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/4 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (/ (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3)))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 7)))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (* (cos (* 1/180 (* angle (PI)))) (pow (sin (* 1/180 (* angle (PI)))) 3))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* x-scale (* y-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* -1/2 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/4 (/ (* x-scale (* (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 (sin (* 1/180 (* angle (PI)))) 4))))))) (pow (sin (* 1/180 (* angle (PI)))) 6)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -1 (* x-scale (+ (* 1/2 (/ (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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)))) 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))) (* (pow y-scale 2) (+ (* -1/2 (/ (* x-scale (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow y-scale 2) (+ (* 1/4 (/ (* x-scale (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 6))) (* 1/2 (/ (* x-scale (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 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 (sin (* 1/180 (* angle (PI)))) 4))))) (pow (sin (* 1/180 (* angle (PI)))) 8))) (* 1/4 (/ (pow (- (/ (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 (sin (* 1/180 (* angle (PI)))) 4)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 4)))))) (pow (sin (* 1/180 (* angle (PI)))) 2)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (/ (+ (* -180 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (PI) (- (pow b 2) (pow a 2))))))) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) x-scale)) (* 2 (* (pow a 2) x-scale))) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (/ (+ (* -2 (* (pow b 2) (pow y-scale 2))) (* 2 (* (pow a 2) (pow x-scale 2)))) y-scale)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* -1/2 (/ (* (pow y-scale 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* 1/4 (/ (* (pow y-scale 2) (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (* (pow y-scale 2) (- (* (pow y-scale 2) (- (* 1/2 (/ (* (pow y-scale 2) (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 4))) (* 1/4 (/ (pow (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (* -1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2))))) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 3))))) (* 1/2 (/ (- (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) #s(hole binary64 (/ (+ (* -2 (/ (* (pow b 2) (pow y-scale 2)) (pow x-scale 2))) (* 2 (pow a 2))) (pow y-scale 2))))
#s(approx (* y-scale y-scale) #s(hole binary64 (pow y-scale 2)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1/2 (/ (* x-scale (* y-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* y-scale (+ (* -1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))) (+ (* -1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (+ (* 1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* y-scale (+ (* -1 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (* 1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)) (+ (* -1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (+ (* 1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* y-scale (+ (* -180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* y-scale (+ (* -2 (/ (pow b 2) x-scale)) (* 2 (/ (* (pow a 2) x-scale) (pow y-scale 2)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* y-scale (+ (* -2 (pow b 2)) (* 2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (* -1 (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 6) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3)))) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow y-scale 2)))) (+ (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (* (pow y-scale 2) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 1/2 (/ (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))) (* (pow y-scale 4) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))) (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2))))))) (+ (* -1/8 (/ (* x-scale (* (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2)))))) (* (pow y-scale 6) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 3) (- (pow b 2) (pow a 2)))))))) (+ (* 1/4 (/ (* x-scale (- (pow (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2)))) 2) (pow (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) 2))))) (* (pow y-scale 4) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (* (+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (- (pow b 2) (pow a 2)))))))) (* 1/2 (/ (* x-scale (+ (* 2 (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 2 (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))))) (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1/2 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/8 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/4 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (* (pow y-scale 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (* (pow (cos (* 1/180 (* angle (PI)))) 7) (sin (* 1/180 (* angle (PI)))))))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (* (pow (cos (* 1/180 (* angle (PI)))) 3) (sin (* 1/180 (* angle (PI)))))))) (* 2 (/ (cos (* 1/180 (* angle (PI)))) (* x-scale (sin (* 1/180 (* angle (PI))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -1 (/ (* x-scale (- (pow (sin (* 1/180 (* angle (PI)))) 2) (* 1/2 (/ (* (pow x-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)))) 2))))) (pow y-scale 2))) (+ (* -1/4 (/ (* (pow x-scale 7) (* (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (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 x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4)))))) (* (pow y-scale 6) (pow (cos (* 1/180 (* angle (PI)))) 6)))) (+ (* 1/2 (/ (* (pow x-scale 3) (- (pow (sin (* 1/180 (* angle (PI)))) 4) (* 1/4 (/ (* (pow x-scale 4) (pow (+ (* -2 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 4))))) (* (pow y-scale 4) (pow (cos (* 1/180 (* angle (PI)))) 2)))) (* 2 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) x-scale)))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -180 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 180 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (* angle (* (pow y-scale 2) (* (PI) (- (pow b 2) (pow a 2))))))) (* 2 (/ (pow b 2) (* angle (* x-scale (* (PI) (- (pow b 2) (pow a 2))))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) x-scale) (pow y-scale 2))) (* 2 (/ (pow b 2) x-scale)))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) #s(hole binary64 (* -1 (* y-scale (+ (* -2 (/ (* (pow a 2) (pow x-scale 2)) (pow y-scale 2))) (* 2 (pow b 2)))))))

Outputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
#s(literal 180 binary64)
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
(.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(literal 1/2 binary64)
(/.f64 (neg.f64 #s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale)))) (neg.f64 (.f64 (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(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale)))
(.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))
#s(literal -2 binary64)
(/.f64 (neg.f64 #s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)) (neg.f64 x-scale))
(/.f64 #s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale)
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)
y-scale
x-scale
(.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))
(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))
angle
(PI.f64)
(sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
(.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))
#s(literal -180 binary64)
(/.f64 (neg.f64 y-scale) (neg.f64 (.f64 angle (.f64 x-scale (PI.f64)))))
(/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64))))
(.f64 angle (.f64 x-scale (PI.f64)))
(*.f64 x-scale (PI.f64))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))
#s(literal 90 binary64)
(/.f64 (neg.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale))) (neg.f64 (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)))) (neg.f64 x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)
(+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) x-scale) (/.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)) x-scale))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) (.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))))))
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)))
(+.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)))
(.f64 (.f64 b b) y-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)))
b
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))
#s(literal 2 binary64)
(/.f64 (neg.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)
(.f64 (.f64 a x-scale) (*.f64 a x-scale))
(.f64 (.f64 a a) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 a x-scale) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a x-scale)) #s(literal 2 binary64)))
(*.f64 (fabs.f64 a) (fabs.f64 a))
(*.f64 (neg.f64 a) (neg.f64 a))
(*.f64 a a)
(pow.f64 a #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
a
(*.f64 (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 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))
(.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))
#s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))
(.f64 #s(literal -1 binary64) (.f64 a a))
#s(literal -1 binary64)
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))) (neg.f64 (PI.f64)))
(/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64))
(atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))
(.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 (neg.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale))) (neg.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
(/.f64 #s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale))
(/.f64 (neg.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)))) (neg.f64 x-scale))
(/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)
(+.f64 (/.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) x-scale) (/.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)) x-scale))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) (.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))))))
(fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)))
(+.f64 (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))
(/.f64 (neg.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale)
(.f64 (.f64 a x-scale) (*.f64 a x-scale))
(.f64 (.f64 a a) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 a x-scale) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 a x-scale)) #s(literal 2 binary64)))
(*.f64 a x-scale)
(.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))
(.f64 (PI.f64) (-.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 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.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))) (PI.f64)))
(/.f64 (neg.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.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 (PI.f64)))
(/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.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))) (PI.f64))
(atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.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 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (neg.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 b b) (.f64 a a))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
(/.f64 #s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.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(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (fma.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))))
(-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))
(.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 a y-scale))
(/.f64 (neg.f64 (.f64 a a)) (neg.f64 (.f64 y-scale y-scale)))
(/.f64 (.f64 a a) (.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 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 b x-scale) (/.f64 b 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 (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 (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 (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)))
(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))
(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)))
#s(approx (* 180 (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI))) (.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) (PI.f64))))
#s(approx (/ (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (PI)) (/.f64 (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) (PI.f64)))
#s(approx (atan (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))) (atan.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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 (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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (.f64 b b)))) (.f64 b b))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #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) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (pow.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.f64 b (cos.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (*.f64 b b)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 (.f64 a a) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (.f64 b b))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))) (.f64 b b)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (*.f64 b b) y-scale) x-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -2 binary64) (.f64 (*.f64 b b) y-scale)))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))))
#s(approx (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale)))
#s(approx (/ (* (* a a) (* x-scale x-scale)) y-scale) (/.f64 (.f64 (.f64 a x-scale) (*.f64 a x-scale)) y-scale))
#s(approx (* (* a a) (* x-scale x-scale)) (.f64 (.f64 a x-scale) (*.f64 a x-scale)))
#s(approx (* a a) (*.f64 a a))
#s(approx a a)
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (*.f64 b b) (PI.f64))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 angle (.f64 (.f64 b b) (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (PI.f64)))
#s(approx (* (PI) (- (* b b) (* a a))) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (PI.f64)) (.f64 (.f64 b b) (PI.f64))))
#s(approx (- (* b b) (* a a)) (*.f64 b b))
#s(approx (- (* b b) (* a a)) (fma.f64 #s(literal -1 binary64) (.f64 a a) (.f64 b b)))
#s(approx (* -1 (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))
#s(approx (* a x-scale) (*.f64 a x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #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 #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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 a a) (-.f64 (fma.f64 (.f64 a a) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 a a) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)))))) (/.f64 #s(literal 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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.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 (pow.f64 (.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 (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))
#s(approx (* 2 (/ (* a a) (* y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale))))
#s(approx (/ (* a a) (* y-scale y-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (*.f64 a a)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 a a)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.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)) (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 #s(literal 1 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 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 (.f64 b b) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) (pow.f64 a #s(literal 4 binary64))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (*.f64 a a)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (*.f64 a a) x-scale) y-scale)))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (*.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 a a)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 x-scale x-scale) y-scale)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 angle (PI.f64)))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (.f64 angle (PI.f64)) (/.f64 (.f64 angle (.f64 (.f64 b b) (PI.f64))) (*.f64 a a)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 #s(literal -1 binary64) (.f64 (*.f64 a a) (PI.f64))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 a a) (fma.f64 #s(literal -1 binary64) (PI.f64) (/.f64 (.f64 (.f64 b b) (PI.f64)) (*.f64 a a)))))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 b b) (.f64 a a)) #s(literal 1 binary64))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 x-scale) (.f64 a 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 x-scale) (.f64 a 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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 a a) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 binary64)))) (+.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)))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.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 -8 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.f64 #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))) (/.f64 #s(literal 1 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 x-scale) (.f64 a 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 (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a x-scale) (.f64 a x-scale))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (.f64 y-scale y-scale))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))) (.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) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 a a)))) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 #s(literal 1 binary64) (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 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (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 #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 (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 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 x-scale (.f64 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 (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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (pow.f64 a #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 a a)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 (.f64 b b) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (.f64 a a))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 (.f64 b b) (-.f64 (/.f64 (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))))) (pow.f64 a #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (*.f64 y-scale (PI.f64))))))))))
#s(approx (* (* b b) y-scale) (.f64 (.f64 b b) y-scale))
#s(approx b b)
#s(approx (- (* b b) (* a a)) (-.f64 (.f64 b b) (.f64 a a)))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (/.f64 #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 (pow.f64 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 (.f64 b b) (-.f64 (fma.f64 (.f64 b b) (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 b b) (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.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 (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 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #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 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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 (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 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 #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 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))) (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale)))))
#s(approx (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (*.f64 y-scale y-scale)))))
#s(approx (* 2 (/ (* b b) (* x-scale x-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale))))
#s(approx (/ (* b b) (* x-scale x-scale)) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b)))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (*.f64 b b))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (sqrt.f64 (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 binary64))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) #s(literal 2 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (/.f64 (.f64 x-scale (.f64 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)) (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 #s(literal 1 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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (.f64 b b)))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b)))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (*.f64 b b)))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (*.f64 x-scale (PI.f64))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64))))) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))))) (pow.f64 b #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64)))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 (*.f64 b b) y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 b b) (fma.f64 #s(literal -2 binary64) y-scale (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (.f64 (.f64 b b) y-scale))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (.f64 angle (PI.f64))) (.f64 b b)) (*.f64 angle (PI.f64)))))
#s(approx (* (PI) (- (* b b) (* a a))) (.f64 (.f64 b b) (+.f64 (PI.f64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 a a) (PI.f64)) (.f64 b b))))))
#s(approx (- (* b b) (* a a)) (.f64 (.f64 b b) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 a a) (*.f64 b b))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (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))) (+.f64 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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 (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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 (.f64 b b) (-.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (fma.f64 #s(literal -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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 6 binary64))) (sqrt.f64 (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 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 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.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 -8 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (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 #s(literal 1 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)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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)) (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.f64 #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))) (/.f64 #s(literal 1 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 (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 (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 (.f64 b b) (.f64 y-scale y-scale)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
#s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.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 (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (*.f64 a a))))))))))) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/881596846080000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/1469328076800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal -1/4407984230400000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/30855889612800000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.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 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (-.f64 (.f64 b b) (.f64 a a))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 #s(literal 32400 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (.f64 (fma.f64 #s(literal 1/22674816000000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (fma.f64 #s(literal 1/4534963200000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a))) (.f64 #s(literal 1/2267481600000 binary64) (.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))))) (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.f64 b b) (.f64 a a)) (-.f64 (.f64 b b) (.f64 a a)))))))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))))) angle))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -360 binary64) (/.f64 y-scale (.f64 x-scale (PI.f64))) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64)) (.f64 (.f64 angle angle) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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))))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (fma.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))) (PI.f64))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))) (PI.f64)) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (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))))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64)))))))) (fma.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (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)))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))) (-.f64 (.f64 #s(literal 180 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))))))))) (PI.f64))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (.f64 (PI.f64) (PI.f64))))))) (PI.f64))))))) (.f64 #s(literal -64800 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))) (.f64 x-scale (*.f64 (PI.f64) (PI.f64)))))))) angle))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (*.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.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 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale)))))))))) (.f64 (.f64 angle angle) (fma.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 y-scale y-scale))) (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) #s(literal 2 binary64)))))))))))) (.f64 (.f64 angle angle) (.f64 x-scale (.f64 y-scale (-.f64 (fma.f64 #s(literal 1/2040733440000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/1224440064000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/816293376000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (fma.f64 #s(literal -1/12244400640000000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x-scale x-scale) (-.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 (.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 (fma.f64 #s(literal 1/12597120000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 1/4199040000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 x-scale x-scale)))) (.f64 #s(literal -1/3149280000 binary64) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (.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))))))))))) (fma.f64 #s(literal 1/1020366720000000 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/612220032000000 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/2 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (-.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 (.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))))) (fma.f64 #s(literal -1/1574640000 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/4 binary64) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (fma.f64 #s(literal -1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (pow.f64 x-scale #s(literal 4 binary64))) (.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))))) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (*.f64 (PI.f64) (PI.f64)))) x-scale))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 #s(literal 1/16200 binary64) (/.f64 (.f64 y-scale (*.f64 (PI.f64) (PI.f64))) x-scale))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal 1/16200 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (.f64 (.f64 angle angle) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/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 #s(literal -2 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal -1/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))))))))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (/.f64 y-scale x-scale))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (.f64 (PI.f64) (PI.f64)))) x-scale) (/.f64 y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (/.f64 (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 y-scale x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (fma.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 y-scale (.f64 (PI.f64) (PI.f64))) x-scale) (.f64 (.f64 angle angle) (/.f64 (fma.f64 y-scale (fma.f64 #s(literal 1/12597120000 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) (.f64 y-scale (fma.f64 #s(literal -1/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 y-scale x-scale)))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale)
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 #s(literal -1/32400 binary64) (.f64 (.f64 angle angle) (.f64 y-scale (*.f64 (PI.f64) (PI.f64)))))))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 y-scale (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (.f64 y-scale (fma.f64 #s(literal 1/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 (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (+.f64 y-scale (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (.f64 y-scale (.f64 (PI.f64) (PI.f64))) (.f64 (.f64 angle angle) (fma.f64 y-scale (fma.f64 #s(literal 1/12597120000 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) (.f64 y-scale (fma.f64 #s(literal -1/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 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))))))))
#s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 (.f64 angle angle) (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 (.f64 angle angle) (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 (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64))
#s(approx (cos (* 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))
#s(approx (cos (* 1/180 (* angle (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 (* 1/180 (* angle (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 (PI)) (*.f64 angle (PI.f64)))
#s(approx angle angle)
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 angle angle) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64))) (.f64 #s(literal 1/180 binary64) (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal 1/22674816000000 binary64) (.f64 (.f64 angle angle) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
#s(approx (sin (* 1/180 (* angle (PI)))) (.f64 angle (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 (/ y-scale (* angle (* x-scale (PI)))) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))))
#s(approx (* angle (* x-scale (PI))) (.f64 angle (.f64 x-scale (PI.f64))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))
#s(approx (* angle (* (PI) (- (* b b) (* a a)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (fma.f64 (.f64 angle angle) (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale))))) (-.f64 (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (/.f64 (.f64 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 b b) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 y-scale y-scale)) (/.f64 (.f64 (.f64 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale))))) (fma.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 x-scale x-scale)) (/.f64 (fma.f64 (.f64 a a) (fma.f64 #s(literal -1/816293376000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal -1/12244400640000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (.f64 (.f64 b b) (fma.f64 #s(literal 1/2040733440000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 #s(literal 1/1224440064000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64)))))) (.f64 y-scale y-scale))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))) (.f64 #s(literal 4 binary64) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (.f64 (-.f64 (.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 (-.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 (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 a a) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (.f64 (.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (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 (-.f64 (/.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 (.f64 b b) (fma.f64 #s(literal 1/12597120000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64)) (.f64 #s(literal 1/4199040000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (.f64 x-scale x-scale)))))))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (*.f64 x-scale x-scale)))))
#s(approx (/ (/ (* (* (* 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 (/ angle 180) (*.f64 #s(literal 1/180 binary64) angle))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))))
#s(approx (* -2 (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale)) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale)))
#s(approx (/ (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) x-scale) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))
#s(approx (* y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) (.f64 y-scale (pow.f64 (cos.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 (cos (* 1/180 (* angle (PI)))) (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (sin (* 1/180 (* angle (PI)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (/ (/ (* (* (* 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 (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 (.f64 x-scale x-scale) (fma.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.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 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (/.f64 (.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 (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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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)))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (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 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (fma.f64 y-scale (-.f64 (/.f64 (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 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.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 x-scale x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 y-scale #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 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 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))))) x-scale))
#s(approx x-scale x-scale)
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (PI)) (*.f64 x-scale (PI.f64)))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) x-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale))
#s(approx (* x-scale x-scale) (*.f64 x-scale x-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 (.f64 x-scale x-scale) (-.f64 (fma.f64 (.f64 x-scale x-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 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 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 b b))) (.f64 x-scale x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a)))))))))) x-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (*.f64 a a))))))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64)))))))) x-scale))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64))))))) x-scale))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) x-scale))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 a a) y-scale)))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 -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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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)) (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-scale (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) x-scale)))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #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 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64))))) #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 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y-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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))) x-scale)))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (.f64 (cos.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 7 binary64))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) x-scale)))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 8 binary64)) (.f64 (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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)) (-.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 x-scale #s(literal 6 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 y-scale y-scale) y-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 (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) x-scale)))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 (.f64 x-scale x-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 a a) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (*.f64 x-scale x-scale)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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))))))) (.f64 (cos.f64 (.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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (.f64 (cos.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 7 binary64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.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 7 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 3 binary64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 x-scale (.f64 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)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 x-scale (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 6 binary64)))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 y-scale y-scale) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.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)) (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 8 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a))))))) y-scale))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 (.f64 a x-scale) (*.f64 a x-scale)))) y-scale))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 (.f64 y-scale y-scale) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (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)) (-.f64 (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 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)))))) (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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))))))) (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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (.f64 a a))) (*.f64 y-scale y-scale)))
#s(approx (* y-scale y-scale) (*.f64 y-scale y-scale))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (.f64 b b) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (*.f64 y-scale y-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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))) (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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale)))))))
#s(approx (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 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 3 binary64)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 2 binary64) (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.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 x-scale x-scale))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))))))
#s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.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 #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 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x-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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 6 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 x-scale x-scale)) #s(literal 3 binary64)) (-.f64 (.f64 b b) (.f64 a a))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 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 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.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 y-scale #s(literal 4 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 b b) (.f64 a a))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))))
#s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))))))
#s(approx (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 (.f64 y-scale y-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (pow.f64 y-scale #s(literal 6 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 7 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))) (.f64 #s(literal 2 binary64) (/.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale)))))))
#s(approx (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 x-scale (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 7 binary64)) (.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (pow.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x-scale x-scale) x-scale) (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x-scale #s(literal 4 binary64)) (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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) x-scale))))))))
#s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))))))
#s(approx (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (/.f64 (*.f64 b b) x-scale))))))
#s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -1 binary64) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) (.f64 y-scale y-scale)) (.f64 #s(literal 2 binary64) (.f64 b b))))))

eval842.0ms (4.3%)

Memory: -21.6MiB live, 1 180.1MiB allocated; 106ms collecting garbage
Compiler: Compiled 62 508 to 5 110 computations (91.8% saved)

prune542.0ms (2.8%)

Memory

4.7MiB live, 1 148.2MiB allocated; 72ms collecting garbage

Pruning

51 alts after pruning (46 fresh and 5 done)

	Pruned	Kept	Total
New	420	15	435
Fresh	7	31	38
Picked	2	3	5
Done	0	2	2
Total	429	51	480

Accuracy

81.8%

Counts

480 → 51

Alt Table

Click to see full alt table

Status	Accuracy	Program
	4.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
	13.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64)))
	14.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 #s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 #s(literal 2 binary64) (.f64 b b))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	15.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
	12.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
	13.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	13.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- ( 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	2.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	9.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	15.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	16.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
✓	9.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	15.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 #s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	9.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	8.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
	24.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
	10.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
	22.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
	41.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	46.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) x-scale))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
✓	47.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	46.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
✓	47.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
	35.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 #s(approx (cos ( 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	46.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	35.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) #s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))))) (PI.f64)))
	38.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) #s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (PI.f64)))
	31.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	30.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
	8.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-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)))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	19.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	20.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64)))
	21.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 #s(approx ( a (sin (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 a (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	18.4%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
	21.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
	18.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (PI.f64)))
	2.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
	22.7%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
✓	36.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
✓	15.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
	20.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) y-scale))))) (PI.f64)))
	6.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
	20.1%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 x-scale (-.f64 (.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64))))))))))) (PI.f64)))
	16.0%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64)))
	12.6%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
	12.2%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))) (PI.f64)))
	11.3%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
	45.5%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
	43.9%	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))

Compiler

Compiled 14 554 to 5 500 computations (62.2% saved)

regimes313.0ms (1.6%)

Memory

23.5MiB live, 624.9MiB allocated; 67ms collecting garbage

Counts

96 → 4

Calls

Call 1

Inputs
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) #s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 #s(approx (+ (* -2 (* (* b b) y-scale)) (* 2 (/ (* (* a a) (* x-scale x-scale)) y-scale))) (.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) x-scale))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale #s(approx (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale)))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (/.f64 (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (PI.f64))) (.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (*.f64 angle (PI.f64)))))) y-scale))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- ( 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 x-scale (-.f64 (.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 180 binary64) (/.f64 #s(literal 1 binary64) (.f64 angle (.f64 y-scale (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) #s(approx (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (.f64 angle (fma.f64 #s(literal 1/180 binary64) (PI.f64) (.f64 (.f64 angle angle) (fma.f64 #s(literal -1/11664000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)) (.f64 #s(literal -1/34992000 binary64) (.f64 (.f64 (PI.f64) (PI.f64)) (PI.f64)))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 x-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 x-scale x-scale)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) y-scale))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale)) (.f64 angle (.f64 (PI.f64) #s(approx (- (* b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (*.f64 b b)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 y-scale (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 b b) x-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 y-scale y-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) (.f64 x-scale x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a x-scale) (.f64 a x-scale)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) (.f64 y-scale y-scale)) x-scale) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) x-scale))) y-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (.f64 (.f64 a a) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 (.f64 a a) x-scale)) (.f64 #s(literal 2 binary64) (/.f64 x-scale y-scale))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64)) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (*.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (.f64 (/.f64 x-scale angle) (/.f64 (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (.f64 (/.f64 a y-scale) (/.f64 a y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale)))))) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) (/.f64 #s(approx ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (.f64 b b) y-scale) (.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (.f64 a x-scale) #s(literal 2 binary64)) y-scale))) x-scale)) (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 (.f64 b b) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 (.f64 a a) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 (.f64 a a) (.f64 angle (.f64 y-scale (PI.f64))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 90 binary64) #s(approx (/ ( x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a))))) (fma.f64 #s(literal -2 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 (.f64 a a) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 b b) (.f64 y-scale (PI.f64)))))) (.f64 #s(literal 2 binary64) (/.f64 y-scale (.f64 angle (.f64 (.f64 b b) (.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 y-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) y-scale) (.f64 angle (.f64 x-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 angle (.f64 y-scale (PI.f64)))))) (.f64 a a))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (fma.f64 #s(literal -180 binary64) (/.f64 y-scale (.f64 angle (.f64 x-scale (PI.f64)))) (.f64 #s(literal 90 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 y-scale (PI.f64))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (.f64 a a) y-scale) (.f64 angle (.f64 x-scale (PI.f64)))))) (.f64 b b))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 b b) (.f64 angle (.f64 x-scale (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 (.f64 a a) x-scale) (.f64 angle (.f64 (.f64 y-scale y-scale) (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 #s(approx (cos ( 1/180 (* angle (PI)))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64)))))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) #s(approx (+ (* -180 (/ x-scale (* angle (* y-scale (PI))))) (* 90 (/ (- (* 2 (/ (* (* b b) y-scale) (* angle (* x-scale (PI))))) (* 2 (/ (* (* b b) x-scale) (* angle (* y-scale (PI)))))) (* a a)))) (.f64 y-scale (fma.f64 #s(literal -180 binary64) (/.f64 x-scale (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64)))) (fma.f64 #s(literal -180 binary64) (/.f64 (.f64 (.f64 b b) x-scale) (.f64 (.f64 a a) (.f64 angle (.f64 (.f64 y-scale y-scale) (PI.f64))))) (.f64 #s(literal 180 binary64) (/.f64 (.f64 b b) (.f64 (.f64 a a) (.f64 angle (*.f64 x-scale (PI.f64))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (.f64 y-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y-scale (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) (.f64 x-scale (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 y-scale x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 #s(approx ( y-scale (pow (cos (* 1/180 (* angle (PI)))) 2)) y-scale) x-scale))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 #s(approx (* 2 (- (pow b 2) (pow a 2))) (.f64 #s(literal 2 binary64) (.f64 b b))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 #s(approx ( a (sin (* 1/180 (* angle (PI))))) (.f64 #s(literal 1/180 binary64) (.f64 a (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b #s(approx (cos ( 1/180 (* angle (PI)))) #s(literal 1 binary64))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 #s(approx (cos (* 1/180 (* angle (PI)))) #s(literal 1 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64))) x-scale))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale #s(approx (- (/ (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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))) (.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 b x-scale) (/.f64 b x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 #s(approx ( x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (.f64 #s(literal -2 binary64) (/.f64 (.f64 y-scale (pow.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 2 binary64))) x-scale))) (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) #s(approx (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 a a) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(approx (- ( b b) (* a a)) (.f64 #s(literal -1 binary64) (.f64 a a)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y-scale x-scale) (/.f64 #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 #s(approx ( y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (.f64 #s(literal 2 binary64) (.f64 (.f64 a a) (.f64 y-scale (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale #s(approx (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2))) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) #s(approx ( x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))) (.f64 (.f64 b b) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 y-scale x-scale) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (exp.f64 (.f64 (log.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) #s(literal 2 binary64)))))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (*.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))))) (.f64 x-scale (.f64 (sin.f64 (fma.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (fma.f64 #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 x-scale x-scale)) (.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 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a)))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2))) (-.f64 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 y-scale y-scale) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 y-scale y-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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))) (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (.f64 x-scale (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (.f64 a a) (.f64 y-scale y-scale)) (.f64 (.f64 angle angle) (-.f64 (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)) (.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 y-scale y-scale)))) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (.f64 (.f64 b b) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (fma.f64 #s(literal 1/32400 binary64) (/.f64 (.f64 (.f64 a a) (.f64 (PI.f64) (PI.f64))) (.f64 x-scale x-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/8100 binary64) (/.f64 (.f64 (.f64 (PI.f64) (PI.f64)) (.f64 (-.f64 (.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 (/.f64 (.f64 b b) (.f64 x-scale x-scale)) (/.f64 (.f64 a a) (.f64 y-scale y-scale)))))))))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 b b) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x-scale (.f64 y-scale (-.f64 (/.f64 (pow.f64 (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 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (sqrt.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (.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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (.f64 x-scale x-scale)))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (.f64 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 (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 (pow.f64 (.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 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)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 #s(approx (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) 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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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 a #s(literal 4 binary64)) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 (.f64 x-scale x-scale) (.f64 y-scale y-scale))) (pow.f64 (-.f64 (/.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (/.f64 (pow.f64 (.f64 a (cos.f64 (.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)) (.f64 x-scale x-scale))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 #s(approx (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (-.f64 (/.f64 (pow.f64 (.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 (pow.f64 (.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 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #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) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) #s(literal 1 binary64))) #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)) #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)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) 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)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal 1/90 binary64) (/.f64 (.f64 angle (.f64 (PI.f64) (-.f64 (.f64 b b) (.f64 a a)))) (.f64 x-scale y-scale)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) #s(approx (sqrt (+ (pow (- (/ (/ (+ (pow ( a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 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))))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #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(literal 2 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 #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(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b #s(approx (cos ( (/ angle 180) (PI))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/64800 binary64) (.f64 (.f64 angle angle) (.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a #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(literal 2 binary64)) (pow.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)))) #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))))))) 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)))) #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))))))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) #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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 #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))) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 #s(approx (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (-.f64 (/.f64 (pow.f64 (.f64 a (cos.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)))) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 #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)))))))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 #s(approx (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) (.f64 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)))))))))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 #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)))))))) y-scale) #s(literal 2 binary64))))) (/.f64 #s(approx (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) (.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)))))))) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 angle (fma.f64 #s(literal 1/90 binary64) (/.f64 (.f64 (PI.f64) (-.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))))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 #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(literal 2 binary64))))) #s(approx (/ (/ ( (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (.f64 #s(literal -2 binary64) (/.f64 (.f64 (.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)))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 #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)))))))))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 #s(approx ( (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (.f64 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)))))))))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 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) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.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)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (sin.f64 (fma.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))) x-scale) y-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 1/2 (/ (* x-scale (* y-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))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale)))))) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))))) (.f64 y-scale (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 x-scale x-scale)) (.f64 #s(literal 4 binary64) (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.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 x-scale x-scale)))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x-scale (.f64 (.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 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 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 4 binary64))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (pow.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 3 binary64)))))))))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 2 binary64) (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x-scale x-scale) (.f64 y-scale (-.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)))))))) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))))) x-scale))) (PI.f64)))
(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow ( a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y-scale (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(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 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.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 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (-.f64 (.f64 b b) (.f64 a a))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y-scale (-.f64 (pow.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.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 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64))) (.f64 y-scale y-scale)) #s(literal 2 binary64)))))) (.f64 (.f64 x-scale x-scale) (.f64 (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (sin.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64)))) (.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 #s(literal 1/180 binary64) (.f64 angle (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (.f64 b (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) (.f64 a a))))))))) x-scale))) (PI.f64)))

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

Calls

11 calls:

34.0ms	(/.f64 angle #s(literal 180 binary64))
31.0ms	angle
30.0ms	y-scale
28.0ms	b
27.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))

Results

Accuracy	Segments	Branch
51.6%	3	`(/.f64 angle #s(literal 180 binary64))`
51.6%	3	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
52.1%	2	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
52.1%	2	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
52.1%	2	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
52.1%	2	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
57.2%	3	`a`
61.5%	4	`b`
51.6%	3	`angle`
55.0%	4	`x-scale`
53.0%	3	`y-scale`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes25.0ms (0.1%)

Memory

15.4MiB live, 60.5MiB allocated; 3ms collecting garbage

Counts

49 → 4

Calls

Call 1

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

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

Calls

1 calls:

16.0ms

Results

Accuracy	Segments	Branch
61.5%	4	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes21.0ms (0.1%)

Memory

-8.5MiB live, 36.9MiB allocated; 4ms collecting garbage

Counts

43 → 2

Calls

Call 1

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

Outputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))))))) (PI.f64)))

Calls

1 calls:

14.0ms

Results

Accuracy	Segments	Branch
58.3%	2	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes57.0ms (0.3%)

Memory

-13.7MiB live, 42.5MiB allocated; 51ms collecting garbage

Counts

41 → 2

Calls

Call 1

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

Outputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* -1/2 (/ (* y-scale (+ (* 2 (pow (* a (sin (* 1/180 (* angle (PI))))) 2)) (* 2 (pow (* b (cos (* 1/180 (* angle (PI))))) 2)))) (* x-scale (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (* b b) (* a a))))))) (/.f64 (*.f64 y-scale (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))))))) (PI.f64)))

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

Calls

1 calls:

50.0ms

Results

Accuracy	Segments	Branch
57.3%	2	`b`

Compiler

Compiled 1 to 5 computations (-400% saved)

regimes154.0ms (0.8%)

Memory

26.8MiB live, 255.4MiB allocated; 29ms collecting garbage

Counts

40 → 1

Calls

Call 1

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

Outputs

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

Calls

11 calls:

22.0ms	angle
20.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
19.0ms	(/.f64 angle #s(literal 180 binary64))
14.0ms	a
13.0ms	x-scale

Results

Accuracy	Segments	Branch
46.1%	1	`(/.f64 angle #s(literal 180 binary64))`
46.1%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
46.1%	1	`angle`
46.1%	1	`y-scale`
46.1%	1	`x-scale`
46.1%	1	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
46.1%	1	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
46.1%	1	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
46.1%	1	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
46.1%	1	`a`
46.1%	1	`b`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes97.0ms (0.5%)

Memory

20.5MiB live, 162.2MiB allocated; 21ms collecting garbage

Counts

27 → 1

Calls

Call 1

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

Outputs

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

Calls

11 calls:

15.0ms	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
11.0ms	x-scale
9.0ms	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
7.0ms	b
7.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))

Results

Accuracy	Segments	Branch
38.9%	1	`(/.f64 angle #s(literal 180 binary64))`
38.9%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
38.9%	1	`angle`
38.9%	1	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
38.9%	1	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
38.9%	1	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
38.9%	1	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
38.9%	1	`y-scale`
38.9%	1	`a`
38.9%	1	`x-scale`
38.9%	1	`b`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes21.0ms (0.1%)

Memory

0.1MiB live, 45.8MiB allocated; 4ms collecting garbage

Counts

2 → 1

Calls

Call 1

Inputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (*.f64 #s(literal -180 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (*.f64 #s(literal -180 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))

Outputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (*.f64 #s(literal -180 binary64) (/.f64 y-scale (*.f64 angle (*.f64 x-scale (PI.f64)))))))) (PI.f64)))

Calls

11 calls:

5.0ms	x-scale
1.0ms	y-scale
1.0ms	(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
1.0ms	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
1.0ms	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))

Results

Accuracy	Segments	Branch
36.3%	1	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
36.3%	1	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
36.3%	1	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
36.3%	1	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
36.3%	1	`a`
36.3%	1	`y-scale`
36.3%	1	`(/.f64 angle #s(literal 180 binary64))`
36.3%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
36.3%	1	`b`
36.3%	1	`angle`
36.3%	1	`x-scale`

Compiler

Compiled 554 to 215 computations (61.2% saved)

regimes15.0ms (0.1%)

Memory

-15.3MiB live, 31.3MiB allocated; 2ms collecting garbage

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (*.f64 #s(literal -180 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))

Outputs

(*.f64 #s(literal 180 binary64) (/.f64 (atan.f64 #s(approx (/ (- (- (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale) (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (sqrt (+ (pow (- (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) 2) (pow (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) 2)))) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) #s(approx (* 90 (/ (* x-scale (* y-scale (- (* 2 (/ (* a a) (* y-scale y-scale))) (* 2 (/ (* b b) (* x-scale x-scale)))))) (* angle (* (PI) (- (* b b) (* a a)))))) (*.f64 #s(literal -180 binary64) (/.f64 x-scale (*.f64 angle (*.f64 y-scale (PI.f64)))))))) (PI.f64)))

Calls

11 calls:

2.0ms	angle
1.0ms	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
1.0ms	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
1.0ms	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
1.0ms	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))

Results

Accuracy	Segments	Branch
15.2%	1	`y-scale`
15.2%	1	(/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))
15.2%	1	(atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)))
15.2%	1	(/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64))
15.2%	1	(.f64 #s(literal 180 binary64) (/.f64 (atan.f64 (/.f64 (-.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (.f64 a (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (.f64 b (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))) (/.f64 (/.f64 (.f64 (.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))) (PI.f64)))
15.2%	1	`a`
15.2%	1	`(/.f64 angle #s(literal 180 binary64))`
15.2%	1	`(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))`
15.2%	1	`angle`
15.2%	1	`b`
15.2%	1	`x-scale`

Compiler

Compiled 554 to 215 computations (61.2% saved)

bsearch201.0ms (1%)

Memory

-0.2MiB live, 348.5MiB allocated; 32ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
72.0ms	27831015791739.65	941211364125283.6
67.0ms	8.415581801672088e-109	3.162985803128019e-107
42.0ms	1.3425146075207477e-152	2.581828772529301e-152

Samples

63.0ms	50×	2	valid
53.0ms	78×	1	valid
40.0ms	157×	0	valid
4.0ms	3×	3	valid

Compiler

Compiled 6 276 to 3 055 computations (51.3% saved)

Precisions

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

ival-pow2: 35.0ms (23.7% of total)

ival-sinu: 29.0ms (19.6% of total)

ival-cosu: 24.0ms (16.2% of total)

ival-mult!: 16.0ms (10.8% of total)

adjust: 16.0ms (10.8% of total)

ival-div!: 15.0ms (10.1% of total)

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

ival-sub!: 4.0ms (2.7% of total)

ival-add!: 3.0ms (2% of total)

ival-atan: 3.0ms (2% of total)

bsearch14.0ms (0.1%)

Memory

-28.2MiB live, 16.9MiB allocated; 9ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
3.0ms	27831015791739.65	941211364125283.6
8.0ms	8.415581801672088e-109	3.162985803128019e-107
2.0ms	1.3425146075207477e-152	2.581828772529301e-152

Compiler

Compiled 6 199 to 3 022 computations (51.3% saved)

bsearch4.0ms (0%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
3.0ms	27831015791739.65	941211364125283.6

Compiler

Compiled 2 426 to 1 185 computations (51.2% saved)

bsearch65.0ms (0.3%)

Memory

22.7MiB live, 122.9MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
58.0ms	3.441457549652812e-53	4.3664107822106844e-52

Samples

23.0ms	20×	2	valid
15.0ms	24×	1	valid
13.0ms	51×	0	valid
1.0ms	1×	3	valid

Compiler

Compiled 2 284 to 1 071 computations (53.1% saved)

Precisions

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

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

ival-cosu: 8.0ms (16.7% of total)

adjust: 6.0ms (12.5% of total)

ival-sinu: 6.0ms (12.5% of total)

ival-div!: 6.0ms (12.5% of total)

ival-mult!: 6.0ms (12.5% of total)

ival-sqrt: 1.0ms (2.1% of total)

ival-add!: 1.0ms (2.1% of total)

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

ival-atan: 1.0ms (2.1% of total)

derivations250.0ms (1.3%)

Memory

-25.6MiB live, 304.5MiB allocated; 19ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 675 to 199 computations (70.5% saved)

preprocess293.0ms (1.5%)

Memory

29.6MiB live, 605.9MiB allocated; 40ms collecting garbage

Remove

(negabs y-scale)

(negabs x-scale)

(abs b)

(abs a)

Compiler

Compiled 19 601 to 7 510 computations (61.7% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze2.3s (11.8%)

sample6.0s (30.7%)

preprocess48.0ms (0.2%)

series498.0ms (2.5%)

rewrite458.0ms (2.3%)

eval117.0ms (0.6%)

prune95.0ms (0.5%)

series905.0ms (4.6%)

rewrite826.0ms (4.2%)

eval904.0ms (4.6%)

prune476.0ms (2.4%)

series549.0ms (2.8%)

rewrite476.0ms (2.4%)

eval748.0ms (3.8%)

prune326.0ms (1.7%)

series436.0ms (2.2%)

rewrite1.5s (7.5%)

eval842.0ms (4.3%)

prune542.0ms (2.8%)

regimes313.0ms (1.6%)

regimes25.0ms (0.1%)

regimes21.0ms (0.1%)

regimes57.0ms (0.3%)

regimes154.0ms (0.8%)

regimes97.0ms (0.5%)

regimes21.0ms (0.1%)

regimes15.0ms (0.1%)

bsearch201.0ms (1%)

bsearch14.0ms (0.1%)

bsearch4.0ms (0%)

bsearch65.0ms (0.3%)

derivations250.0ms (1.3%)

preprocess293.0ms (1.5%)

end0.0ms (0%)

Profiling